Scrollen in einer Listbox

[bumpelwumpel]

Hi,

ich habe eine Listbox in die viel Itemes hinzugefügt werden. Deshalb möchte ich eine Autoscroll Funktion nutzen.

Delphi-Quellcode:

Listbox1.ItemIndex := Listbox1.Items.Count - 1;

Das klappt auch. Aber jetzt wird ja immer das letzte Item markiert. Das heißt dann aber das es standartmäßig
blau hinterlegt wird und einen gestrichelten Rahmen bekommt. Wo kann ich das ändern?

Oder gibt es noch eine weitere Möglichkeit zu scrollen ohne das man es sieht?

[himitsu]

probier mal

Delphi-Quellcode:

Listbox1.ItemIndex := Listbox1.Items.Count - 1;
Listbox1.ItemIndex := -1;

[DeddyH]

Oder

Delphi-Quellcode:

Listbox.Perform(WM_VSCROLL, SB_BOTTOM, 0);

[bumpelwumpel]

Zitat:

Zitat von himitsu

probier mal

Delphi-Quellcode:

Listbox1.ItemIndex := Listbox1.Items.Count - 1;
Listbox1.ItemIndex := -1;

Funktioniert fast. Aber manchmal blitzt dann doch die blaue Markierung auf.
Kann man die Farbe der Markierung nicht ändern?
Dann würde das letzte Element immer komplett angezeigt werden.

Zitat:

Zitat von DeddyH

Oder

Delphi-Quellcode:

Listbox.Perform(WM_VSCROLL, SB_BOTTOM, 0);

Das klappt schon besser. Aber es kann sein, dass das Programm nicht ganz nach unten scrollt und dann wird manchmal nur
die hälfte des Textes angezeigt.