Можно ли изменить число колонок и их ширину в компоненте TFileListBox?

Материал из DRKB

Можно ли изменить число колонок и их ширину в компоненте TFileListBox?[править | править код]

В приведенном примере FileListBox приводится к типу TDirectoryListBox - таким образом можно добавить дополнительные колонки.


with TDirectoryListBox(FileListBox1) do 
begin
  Columns := 2;
  SendMessage(Handle, LB_SETCOLUMNWIDTH, Canvas.TextWidth('WWWWWWWW.WWW'), 0);
end;


ID: 00657