Cita:
Empezado por ixMike
Hola.
Para saber el ancho de un ListBox yo utilizo esto:
Código Delphi [-]Procedure TForm1.Button1Click(Sender: TObject);
var ancho, n: integer;
begin ancho:=0; for n:=0 to ListBox1.Items.Count-1 do if ListBox1.Canvas.TextWidth(ListBox1.Items[n])>ancho then ancho:=ListBox1.Canvas.TextWidth(ListBox1.Items[n]); ListBox1.Width:=Ancho; end;
Espero que te sea de ayuda.
Saludos
|
Me ha servido de muuuuuuucha ayuda
Gracias
Salvica