Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.04.17;
Скачать: CL | DM;

Вниз

Достать иконку из файла рессурсов....   Найти похожие ветки 

 
LyzD ©   (2003-03-30 16:13) [0]

По умолчанию в проект включается файл рессурсов который содержит иконку MAINICON.

procedure TForm1.FormCreate(Sender: TObject);
var
ResStream: TResourceStream;
Tray: TNotifyIconData;
Icon: TIcon;
ID: byte;
begin
Icon := TIcon.Create;
ResStream := TResourceStream.Create(HInstance, "MAINICON", RT_ICON);
Icon.LoadFromStream(ResStream);
Icon.Destroy;
end;

на что при старте он ругается что ресурс с именем MAINICON не найден...
Если использовать CreateFromID то он загружает иконку от "Form"...

Подскажите что я делаю не правильно???


 
LyzD ©   (2003-04-06 17:23) [1]

up



Страницы: 1 вся ветка

Текущий архив: 2003.04.17;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.031 c
1-54654
big_bugzy
2003-04-08 13:07
2003.04.17
Что вперед создается при использовании объектов автоматизации?


14-54886
Aga
2003-03-28 18:35
2003.04.17
Shell Namespace


1-54652
SynapseAlex
2003-04-08 10:03
2003.04.17
Служба


14-54892
shoo
2003-04-01 10:40
2003.04.17
Инсталляторы


3-54441
Pk
2003-03-28 15:40
2003.04.17
Запретить удаление записей в таблице