Главная страница
    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.46 MB
Время: 0.064 c
2-1170571715
Alex_C
2007-02-04 09:48
2007.02.25
Проблема с руссим языком в англоязычной XP


15-1170369350
SerJaNT
2007-02-02 01:35
2007.02.25
Зацените!


2-1170760534
seesm
2007-02-06 14:15
2007.02.25
Я не знаю asm


15-1170176379
Chort
2007-01-30 19:59
2007.02.25
Распределить текст по разным столбцам


3-1165326993
DmitryNekl
2006-12-05 16:56
2007.02.25
Логические поля в MySQL и Delphi





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский