Форум: "WinAPI";
Текущий архив: 2004.02.29;
Скачать: [xml.tar.bz2];
Вниз
Свойства папки (файла) Найти похожие ветки
← →
Matrex (2003-12-21 19:31) [0]Господа! Как вызвать стандартное окно виды "Свойства папки (файла)"?
← →
DDA (2003-12-21 22:29) [1]procedure ShowFileProperties(const FileName: string);
var
ShellExecuteInfo: TShellExecuteInfo;
begin
// Инициализация структуры TShellExecuteInfo
FillChar(ShellExecuteInfo, SizeOf(TShellExecuteInfo), 0);
// Заполнение структуры TShellExecuteInfo
ShellExecuteInfo.cbSize := SizeOf(TShellExecuteInfo);
ShellExecuteInfo.lpFile := PChar(FileName);
ShellExecuteInfo.lpVerb := "properties";
ShellExecuteInfo.fMask := SEE_MASK_INVOKEIDLIST;
// Отображение свойств файла
ShellExecuteEx(@ShellExecuteInfo);
end;
Страницы: 1 вся ветка
Форум: "WinAPI";
Текущий архив: 2004.02.29;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.01 c