Buscar

Como tabular um listbox?

Código

Procedure TForm1.FormActivate(Sender: TObject);
var
  MatTabs : Array[0..5] of Integer;
begin
  MatTabs[0] := 40;
  MatTabs[1] := 80;
  MatTabs[2] := 200;
  MatTabs[3] := 400;
  MatTabs[4] := 500;
  MatTabs[5] := 700;
  ListBox1.Perform(LB_SETTABSTOPS,1,Integer(@MatTabs[0]));
end;

Publicidade

Vote na dica




Quantidade de votos: 0 votos
Aceitação: 0%


Detalhes da dica

Categoria: Componentes
Adicionada dia: 06/06/03
Por: Felipe Monteiro
Visualizada: 3565 vezes

Planeta Delphi - Tudo sobre programação Delphi Planeta Delphi - www.planetadelphi.com.br - Todos os direitos reservados | Copyright 2001-2009