Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.05.15;
Скачать: 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 вся ветка

Текущий архив: 2003.05.15;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.018 c
14-47000
AZ
2003-04-26 23:18
2003.05.15
---|Ветка была без названия|---


14-46951
USB Flash Drive
2003-03-31 17:33
2003.05.15
При установке драйвера USB Flash исчезает CD-ROM ?


14-46932
alxx
2003-04-23 10:35
2003.05.15
А кто чем формулы оформляет в документах?


3-46657
Шапранов Сергей Николаевич
2003-04-24 17:36
2003.05.15
максимальное количество записей в Парадоксе


4-47047
Константин Артемьев
2003-03-13 17:40
2003.05.15
Как перехватить перезапись файла?