TListView: Nach unten scrollen

[sundance]

Hallo DelphiFans,

für ein Programm habe ich eine ListView-Komponente 'eingebaut', die als Log-Fenster dienen soll, d.h. ich schreibe über ListView.Items.Add nacheinander Einträge hinein. Wie macht man es nun, dass immer der letzte Eintrag sichtbar ist und der Rest nach oben wegscrollt?

.sundance.

[jfheins]

Das müsste wie auf im Memo mit WM_VSCROLL funktinieren ...

also:Lv.Perform(WM_VSCROLL,SB_BOTTOM,0);

[marabu]

Manchmal reicht schon das hier:

Delphi-Quellcode:

with ListView.Items.Add do
begin
  Caption := DateTimeToStr(Now);
  SubItems.Add('LogText');
  // ...
  MakeVisible(False);
end;

Grüße vom marabu

[sundance]

Vielen Dank für eure schnelle Hilfe!

Ich hab's mit beiden Vorschlägen versucht und es funktioniert jeweils einwandfrei!

.sundance.