использование компонента TShellListView

← →
jura (2005-05-31 15:37) [0]

для выбора файлов использую компонент TShellListView. во время их выбора неплохо видеть размер файла и поэтому свойство ViewStyle ставлю = vsReport, не могу добиться фиксированого размера колонок, при изменении каталогов ширина колонок меняется, почемуто ShellListView1.Columns[0].AutoSize:=false; не помогает.

Спасибо

← →
Ученик (2005-05-31 22:53) [1]

Delphi?\Demos\ShellControls\ShellCtrls.pas

procedure TCustomShellListView.EnumColumns; ... procedure AddDefaultColumns(const ColCount: integer = 1); begin if ColCount > 0 then AddDefaultColumn(SShellDefaultNameStr, taLeftJustify, 25); if ColCount > 1 then AddDefaultColumn(SShellDefaultSizeStr, taRightJustify, 10); if ColCount > 2 then AddDefaultColumn(SShellDefaultTypeStr, taLeftJustify, 10); if ColCount > 3 then AddDefaultColumn(SShellDefaultModifiedStr, taLeftJustify, 14); end;

использование компонента TShellListView Найти похожие ветки