Autosize-Spalten für TListView

Question

Ich möchte alle Spalten in TListView automatisch skalieren. Ich benutze unten Code, aber es tut nichts.

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

Wie kann ich die Spalten von TListView in Delphi automatisch Größe.

Ich setze meine ViewStyle to vsReport.

Vielen Dank im Voraus

Answer 1

Ich habe die Antwort bekommen. Die Einstellung der Spaltenbreite auf -1 oder -2 löste das Problem.

Verwenden -1 Einstellen der Spaltenüberschrift auf die Größe des größten subitem Text in der Spalte zu setzen,

und -2 Einstellen der Spaltenüberschrift auf die Größe des Textes in der Spaltenüberschrift gesetzt.

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

Answer 2

Try this:

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

    { // Add your items } 

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