Rolagem no listbox

Delphi

29/09/2009

Pessoal

Estou incluindo linhas em um listbox e quando chega a 10 linhas as próximas não ficam visiveis e abre a barra de rolagem do lado direito.
Gostaria de saber se via programação posso rolar para visualizar as linhas seguintes a cada inclusão apartir da decima.

Valeu !!!
:lol:


Mrobertopb

Mrobertopb

Curtidas 0

Respostas

Carlosrm

Carlosrm

29/09/2009

mrobertoPB,

Veja se dá para adaptar ao seu projeto (usei o bds2006):

procedure TForm1.Button1Click(Sender: TObject);
begin
  Listbox1.Items.add(inttostr(listbox1.Count));
  listbox1.ItemIndex:= listbox1.Count -1;
end;


Neste caso, o ´truque´ é informar à ListBox que o item (linha) a ficar em destaque (visível) é o último item inserido.

Espero que seja útil. carlosrm.


GOSTEI 0
Mrobertopb

Mrobertopb

29/09/2009

carlosrm

Na mosca. Muito Agradecido !!
Valeu mesmo !!
:lol:


GOSTEI 0
POSTAR