Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как получить путь к приложению по его расширению? [D6, WinXP]

brestmarket © (2002-10-18 14:27:00)
Как получить путь к приложению по его расширению?
Попытка залезть и узнать из HKEY_CLASSES_ROOT\.gif
ничего не дала - нет там у меня пути (возможно, потому-что установлен ACDSee 5.0)

и
почему не работает процедура показа иконки для определенного файла:

procedure ShowIcon;
var
W : Word;
begin
W := 0;
Form1.Icon.Handle := {изображение иконки вы увидите в заголовке окна}
{можно, конечно, посмотреть его и в TImage: для этого вместо "Form1.Icon.Handle" напишите "Image1.Picture.Icon.Handle"}
ExtractAssociatedIcon(HInstance,
Pchar("c:\windows\*.txt"), W);
end;

Song (2002-10-18 15:10:00) [1]
>>Как получить путь к приложению по его расширению?
FindExecutable()

>>почему не работает процедура показа иконки для определенного файла
Потому что для ExtractAssociatedIcon() нужен определённый файл.
Если нужно по расширению, то это либо как Вы уже заметили HKEY_CLASSES_ROOT или ShGetFileInfo()

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »