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

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

Как загрузить в Bitmap изображение из файлов jpeg, gif, и тд. [D6, Win95/98, WinME, NT4, Win2k, WinXP]

SNV-Soft ©   (2004-08-30 07:17:00) 

Ув. знатоки, подскажите как в Bitmap загрузить изображение хотябы из форматов jpeg и gif!?..
Заранее спасибо!

---

SNV-Soft   (2004-08-30 08:07:00) [1]

да это работает, но я по глупости не  точно вопрос задал.
Проблема вообщем такая. Есть компонент фоновым рисонком которого
может быть только bmp файл..дык вот как загрузить туда файл формата jpeg или gif!?...
Еще раз спасибо!

---

Goorus   (2004-08-30 07:27:00) [2]

В uses добавь JPEG.

procedure LoadToBitmap(var bmp:TBitmap; const fn:String);
var p:TPicture;
begin
 p:=TPicture.Create;
 p.LoadFromFile(fn);
 if not Assigned(bmp) then bmp:=TBitmap.Create;
 bmp.Width :=p.Width;
 bmp.Height:=p.Height;
 bmp.Canvas.Draw(0, 0, p.Graphic);
 p.Free;
end;

Где-то мог ошибится, но принцип такой.

---

Наверх