Delphi-PRAXiS - Delphi TListView Autoscroll

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)

- GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)

- - Delphi TListView Autoscroll (https://www.delphipraxis.net/107303-tlistview-autoscroll.html)

d1ng0d0gt0r

25. Jan 2008 14:02

TListView Autoscroll

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

25. Jan 2008 14:11

Re: TListView Autoscroll

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

Delphi-Quellcode:

lstLog.Perform(WM_VSCROLL,SB_BOTTOM,0);

d1ng0d0gt0r

25. Jan 2008 21:28

Re: TListView Autoscroll

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

marabu

26. Jan 2008 10:32

Re: TListView Autoscroll

Hallo,

hier noch was zum Nachdenken:

Delphi-Quellcode:

			with ListView do

  if not Focused then

    Items[Pred(Items.Count)].MakeVisible(False);

Freundliche Grüße

Alle Zeitangaben in WEZ +1. Es ist jetzt 22:21 Uhr.