Вниз
Скачать: CL | DM;

окно Свойства для указанного файла   Найти похожие ветки 

← →
xuthus   (2005-09-29 12:56) [0]

Здравствуйте!

Как мне отобразить окно Свойства для указанного файла?
То есть есть имя файла, нужно отобразить то окошко, которое появляется при выборе пункта Свойства в Эксплорере в контекстном меню Проводника. В дальнейшем мне неинтересно, что пользователь сделал с этим окошком и собственно свойствами файла - нужно только открыть. Можно даже через какой-нибудь rundll


← →
begin...end ©   (2005-09-29 13:05) [1]

Используйте функцию ShellExecuteEx из модуля ShellAPI. Пример:

procedure ShowFileProperties(const FileName: String);
var
 Info: TSHELLEXECUTEINFO;
begin
 ZeroMemory(@Info, SizeOf(Info));
 with Info do
 begin
   cbSize := SizeOf(Info);
   lpFile := PChar(FileName);
   lpVerb := "properties";
   fMask  := SEE_MASK_INVOKEIDLIST;
 end;
 ShellExecuteEx(@Info);
end


← →
xuthus   (2005-09-29 14:00) [2]

Спасибо, помогло :) Удачи!



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

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



Память: 0.45 MB
Время: 0.026 c
14-1132052141
oleggar
2005-11-15 13:55
2005.12.04
clipper deploy


6-1124210545
Doplhin1
2005-08-16 20:42
2005.12.04
Chat


3-1129545178
Stanislav
2005-10-17 14:32
2005.12.04
Использование _Recordset


1-1131440816
DinoRay
2005-11-08 12:06
2005.12.04
непонятки с таймером 2


1-1131051613
Toxa_ua
2005-11-04 00:00
2005.12.04
ComponentCount в TEdit




   Наверх