Форум: "Основная";
Текущий архив: 2002.10.28;
Скачать: [xml.tar.bz2];
ВнизКак получить путь к приложению по его расширению? Найти похожие ветки
← →
brestmarket (2002-10-18 14:27) [0]Как получить путь к приложению по его расширению?
Попытка залезть и узнать из 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) [1]>>Как получить путь к приложению по его расширению?
FindExecutable()
>>почему не работает процедура показа иконки для определенного файла
Потому что для ExtractAssociatedIcon() нужен определённый файл.
Если нужно по расширению, то это либо как Вы уже заметили HKEY_CLASSES_ROOT или ShGetFileInfo()
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2002.10.28;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.01 c