![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Получение иконки
gidd © (2006-10-12 14:22:00)Как можно получить иконку ассоциированную в системе с определенный типом фаилов ?
И еще вопросик, как запустить файл в программе к которой он привязан в системе?
DevilDevil (2006-10-12 15:59:00) [1]
function GetFileIcon(FileName : string) : hIcon;
var W : Word;
begin
W := 0;
Result:=ExtractAssociatedIcon(hInstance,pchar(ExtractFileName(FileName)),W);
end;
ProgRAMmer Dimonych (2006-10-12 14:40:00) [2]> И еще вопросик, как запустить файл в программе к которой
> он привязан в системе?
ShellExecute. Должен быть подключён модуль ShellAPI.