Информационный портал для программистов “Useful”




	главная страница \| гостевая книга

программы
советы по delphi
web-мастерам
работа в сети
документы
услуги

Извлечение иконки из EXE-файла

var
MyIcon: TIcon;
begin
MyIcon := TIcon. Create;
try
MyIcon.Handle := ExtractIcon(hInstance, 'MYPROG.EXE', 0)
{Здесь можно что-нибудь сделать с иконкой}
finally
MyIcon.Free;
end;
end;

Имейте в виду, что средний параметр должен иметь тип PChar.




	Главная страница
	Гостевая книга




	Интернет и сети
	ОС и железо
	Мультимедия
	Файловая система
	Компоненты
	Базы данных
	Советы мастеров
	Разное

Хостинг от uCoz