Как открыть окно

← →
Номолос (2003-07-12 22:10) [0]

Могу ли я и как открыть окно "Свойства файла / папки" из программы?

← →
Fillip (2003-07-12 23:17) [1]

Естественно можешь. StringList? ListView и т.п. Формулируй конкретней, то-ли ты хочешь менять эти установки, то-ли ???

← →
Fillip (2003-07-12 23:21) [2]

Сорри, забыл написать ключевое слово. File atributex

← →
Номолос (2003-07-13 08:06) [3]

Не совсем. Я хочу открыть стандартное окошко "Свойства файла", которое открывается из меню, когда на файле жмёшь правой кнопкой.

function ShowFilePropertiesDialog(const Handle: HWND; const FileName: string): Boolean;
var
Info: TShellExecuteInfo;
begin
FillChar(Info, SizeOf(Info), #0);
with Info do
begin
cbSize := SizeOf(Info);
lpFile := PChar(FileName);
nShow := SW_SHOW;
fMask := SEE_MASK_INVOKEIDLIST;
Wnd := Handle;
lpVerb := cProperties;
end;
Result := ShellExecuteEx(@Info);
end;

Как открыть окно Найти похожие ветки