Текущий архив: 2005.12.04;
Скачать: 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 вся ветка
Текущий архив: 2005.12.04;
Скачать: CL | DM;
Память: 0.47 MB
Время: 0.044 c
