Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

загрузить JPEG  в EXE [D5, Win95/98]


deymon ©   (2002-06-15 17:34:00) 

У меня есть код, но он не работает, т.е. иконка остается прежней

var
Form1: TForm1;
MyJPG : TJPEGImage;
ResStream : TResourceStream;
implementation

{$R *.DFM}
{$R MyPic.RES}

begin
MyJPG := TJPEGImage.Create;
ResStream := nil;
try
ResStream := TResourceStream.CreateFromID(HInstance,1,RT_RCDATA);
MyJPG.LoadFromStream(ResStream);
finally
MyJPG.Free;
ResStream.Free;
end;
end.


может, дело в размере jpeg-файла?
Подскажите, please!


anod   (2002-06-15 20:03:00) [1]

Бред какой-то.


Poirot   (2002-06-15 20:00:00) [2]

А может я тупой... но я впринципе ничего не понимаю... какая иконка... что вам надо-то.... и тогда причем тут ЖПГ...


Наверх

Титульная страница Поиск, карта сайта Написать письмо