Автоматическая настройка столбцов для TListView

Я хочу автоматически изменить размер всех столбцов в TListView. Я использую ниже код, но он ничего не делает.

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

Как я могу автоматически изменять размер столбцов TListView в Delphi.

Я ViewStyle to vsReport.

спасибо заранее

14
delphi delphi-2006 tlistview

2 ответов

Я получил ответ. Установка ширины столбца в -1 или -2 решила проблему.

использовать -1 параметр, чтобы задать заголовок столбца, чтобы размер наибольшего ПП. текст в столбце

и параметр -2 для установки заголовка столбца в размер текста в заголовке столбца. 

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

попробуйте это:

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

  { // Add your items  }

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