Главная страница
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
1-46795
Юлия
2003-05-02 12:29
2003.05.15
FindComponent (элемент управления на другой форме )


1-46791
oleg_sys
2003-05-01 14:41
2003.05.15
Вывод TFileStream в INI-файл


8-46854
Axis_of_Evil
2003-02-05 09:42
2003.05.15
Таймер, блин.


14-46956
VEG
2003-04-26 18:58
2003.05.15
Морковка едет на учебе и игнорирует!


1-46801
exo
2003-05-02 12:47
2003.05.15
как дописать в конец файла с помощью TFileStream