List BOX

Question

Ol� tudo bem?Como fa�o para navegar entre os items de um list box, por exemplo?Tenho dois bot�es um para avan�ar e outro para retornar entre os items do list box. N�o quero fazer um looping, quero ir ...

Aroldo Zanela · Answer

[code:1:4e1a978531]procedure TForm1.Button1Click(Sender: TObject);begin  if ListBox1.ItemIndex=-1 then ListBox1.ItemIndex := 0;  ListBox1.ItemIndex := ListBox1.ItemIndex+1;end;procedure TForm1.Button2Click(Sender: TObject);begin  ListBox1.ItemIndex := ListBox1.ItemIndex-1;end;[/code:1:4e1a978531]...

F�rum List BOX #147681