Главная страница
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.08 c
1-46721
lameridze
2003-05-04 12:51
2003.05.15
procedure


14-46995
Viktor Kushnir
2003-04-28 07:07
2003.05.15
Редактор формул


14-46920
race1
2003-04-24 14:46
2003.05.15
вопросы


8-46850
}{enon
2003-01-30 19:08
2003.05.15
Формат GIF


3-46635
DBDev
2003-04-24 12:40
2003.05.15
ПОМОГИТЕ написать процедуру извлечения потомков, ПЛЗ!!!...