listview, autoajustar tamaño columnas

[munheko]

He metido lo siguiente en un boton

procedure Tfmain.Button1Click(Sender: TObject);
begin
LV1_1.Column[0].AutoSize:=true;
LV1_1.Column[1].AutoSize:=true;
LV1_1.Column[2].AutoSize:=true;
LV1_1.Column[3].AutoSize:=true;
end;

y no hace nada la darle. No se si es esto lo que tu me dices

EDITO: lo que quiero es que se ajuste al mayor item, de un lista de valores, el mayor, no a la cabecera de la columna (zona gris). Creo que no me exprese bien.

[roman]

Además de AutoSize = true intenta poner la propiedad Width de las columnas en -1. Creo que en Delphi 7 quitaron la explicación del archivo de ayuda pero supongo que la funcionalidad debe ser la misma:

Width = -1 la columna se autoajusta al ancho de los items
Width = -2 la columna se autoajusta al ancho del encabezado

// Saludos

[munheko]

Os quiero tios!!!

muxas gracias!!!