Скачать: CL | DM;

О свойстве файла.   Найти похожие ветки 

← →
Azazello   (2003-05-01 09:20) [0]

Привет, всем!

Появился вопрос по свойству файлов.

Как вызвать стандартное окно операционной системы о свойстве файла?

Допустим, есть файл c:\Скрыто_где_то_и_не_найдеш\папка\Отчет.doc.
Нажимаем кнопку и появляется супер - пупер окно со свойства файла.

---

← →
Ученик ©   (2003-05-01 11:13) [1]

{ Project JEDI Code Library (JCL) }

const
cVerbProperties = "properties";

function DisplayPropDialog(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 := cVerbProperties;
end;
Result := ShellExecuteEx(@Info);
end;

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.44 MB
Время: 0.011 c