TListView Autoscroll

[d1ng0d0gt0r]

Hallo alle zusammen.

Ich bin blutiger Delphi-Anfänger, habe vorher VB6 programmiert, was mir letztendlich zu langsam war und zu wenige Möglichkeiten bot.

Meine Frage:
Ich versuche nun mein ListView automatisch zum letzten Eintrag scrollen zu lassen. Das geht auch mit der TListBox und dem Code der im Umlauf ist (SendMessage), jedoch versagt er bei dem TListView.

Ebenfalls probiert habe ich es mit:

Delphi-Quellcode:

lstLog.Scroll(0,lstLog.Items.Count-1);

Gruß

[DeddyH]

Hallo und Willkommen in der DP :dp:
Das funktioniert bei mir:

Delphi-Quellcode:

lstLog.Perform(WM_VSCROLL,SB_BOTTOM,0);

[d1ng0d0gt0r]

Ich danke für die schnelle Antwort. So geht es.

[marabu]

Hallo,

hier noch was zum Nachdenken:

Delphi-Quellcode:

with ListView do
  if not Focused then
    Items[Pred(Items.Count)].MakeVisible(False);

Freundliche Grüße