 |
Delphi Tips & Tricks | softsale > Delphi Tips & Tricks |
| następna rada > | < poprzednia rada |
Jak skrolować listbox przy dopisywaniu?
Przy dopisywaniu do listboxa często chcemy aby ostatnio dopisany element był od razu widoczny. Można to bardzo łatwo osiągnąć korzystając z procedury dopisz_do_listboxa:
Procedure TForm1.dopisz_do_listboxa(aMsg : String);
begin
With ListBox1 do
begin
Items.Add(AMsg);
if (ItemHeight * Items.count) > Height then
TopIndex:= Items.count - (Height div ItemHeight) ;
end;
ListBox1.Refresh;
end;
Ilustruje to przykład tip33.zip . Proszę porównać działanie klawisza Dopisz do listboxa dla pierwszych 4 kliknięć i następnych. |
|
SOFTSALE - Oprogramowanie i Szkolenia softsale@softsale.com.pl 03-565 Warszawa , ul. Borzymowska 43 lok. 301C tel/fax:4084840,0607612428 |