Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.02.25;
Скачать: CL | DM;

Вниз

Свойства файла   Найти похожие ветки 

 
Litestone   (2007-02-04 11:51) [0]

Привет всем!!!

Знает ли кто нибудь, как из своей программы запустить окно - свойства файла из Windows(щелкнуть правой кнопкой мыши по файлу и выбрать пункт свойства), если известен путь к файлу.

Заранее благодарен за ответы.


 
begin...end ©   (2007-02-04 12:15) [1]

Можно использовать API-функцию SHObjectProperties (если не ошибаюсь, её потребуется импортировать из Shell32.dll самостоятельно). Есть и ещё вариант -- ShellExecuteEx с SHELLEXECUTEINFO.lpVerb = "properties", но я бы предпочёл первое.


 
Litestone   (2007-02-04 12:43) [2]

begin...end, а ты не мог бы написать пример кода как импортирвать эту функцию, а то я попробовал и ничего не получись.


 
Leonid Troyanovsky ©   (2007-02-04 13:43) [3]


> Litestone   (04.02.07 12:43) [2]

> эту функцию, а то я попробовал и ничего не получись.

Показывай.

--
Regards, LVT.


 
Litestone   (2007-02-04 13:51) [4]

с импортированием я просто не знаю какие параметры у этой функции,
а 2 способ тоже выдаёт глюк.

var d:PShellExecuteInfoA;
begin
d.lpVerb:=PChar(FileName);
ShellExecuteEx(d);
end;


 
Virgo_Style ©   (2007-02-04 14:01) [5]

Litestone   (04.02.07 13:51) [4]
теперь сравни [4] и [1]


 
Litestone   (2007-02-04 14:07) [6]

а ты пробовал делать 1 вариант.


 
Anatoly Podgoretsky ©   (2007-02-04 14:26) [7]

Пробовать твоя задача


 
Litestone   (2007-02-04 14:33) [8]

Дак я пробовал, я всё пробовал и то что я предложил, единственное, что у меня получилось.


 
Virgo_Style ©   (2007-02-04 14:44) [9]

http://kladovka.net.ru/delphibase/?action=viewfunc&topic=fileattr&id=10057


 
Litestone   (2007-02-04 14:53) [10]

Громадное спасибо Virgo_Style всё работает.

P.S. кладовка хорошая вещь.



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

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

Наверх




Память: 0.48 MB
Время: 0.029 c
2-1170673904
bagos
2007-02-05 14:11
2007.02.25
speech


15-1169912382
Ringo
2007-01-27 18:39
2007.02.25
Геополитка типа. А зачем нам Сербия? Болгария? Хуже предать, кто


15-1170245394
Lik
2007-01-31 15:09
2007.02.25
выбор технологии CORBA, Web-service,MIDAS


8-1151581381
пигмалеон
2006-06-29 15:43
2007.02.25
очистить прозрачный canvas


15-1170314724
=Teddy=
2007-02-01 10:25
2007.02.25
Откуда скачать Indy 10 для Delphi 5 !!!