Columnas de tamaño automático para TListView

Question

Quiero autoasignar todas las columnas del TListView. Estoy usando el código siguiente, pero no está haciendo nada.

ListView1.Columns.Add.Caption := 'Field Name'; 
ListView1.Columns.Items[0].Autosize := True; 

¿Cómo puedo autoasignar las columnas de TListView en Delphi?

Configuré mi ViewStyle to vsReport.

Gracias de antemano

Answer 1

Tengo la respuesta. Configurar el ancho de la columna a -1 o -2 resolvió el problema.

Uso -1 ajuste para establecer el encabezado de columna para el tamaño de la más grande de texto subpunto en la columna,

y una -2 ajuste para establecer el encabezado de columna para el tamaño del texto en el encabezado de la columna.

ListView1.Columns[0].Width := -1 or -2; 

Answer 2

Prueba esto:

// Assign vsReport;  
ListView1.ViewStyle := vsReport; 

    { // Add your items } 

// Assign vsList again; 
ListView1.ViewStyle := vsList;