Скачать: CL | DM;

GIF   Найти похожие ветки 

← →
GIL ©   (2003-05-08 15:16) [0]

Есть-ли где-нибудь компонент, который понимает bmp,jpeg,gif и как с ним работать, и чтобы работал в DELPHI 6, а то достал один, так он один раз и сработал, а дальше какбудто ничего и не было!

---

← →
Имхо Петрович   (2003-05-08 15:24) [1]

А зачем? Чтобы создавать нужный TGraphic по расширению необходимо написать всего-то строк 10 и подключить RxGIF. Всех всех, bmp, gif, jpg, jpeg, ico, wmf, emf.

---

← →
GIL ©   (2003-05-08 15:29) [2]

а можно чуть-чуть поподробнее? Как потом это вывести на экран?

---

← →
NAlexey ©   (2003-05-08 15:42) [3]

Как на экран вывести? Ну к примеру выводи Draw, а лучше BitBlt. Ну а так бы я написал эти 10 строк:

procedure BlahBlah(Sender: TObject);
var
Source: TGraphic;

function AnyGraphicClass: TGraphicClass;
var
Extension: String;
begin
Result := nil;
Extension := UpperCase(ExtractFileExt(YourFileName));
if Extension = ".BMP" then Result := TBitmap
else if Extension = ".GIF" then Result := TGIFImage
else if Extension = ".JPG" then Result := TJPEGImage
else if Extension = ".JPEG" then Result := TJPEGImage
else if Extension = ".ICO" then Result := TIcon
else if Extension = ".WMF" then Result := TMetaFile
else if Extension = ".EMF" then Result := TMetaFile
else
Exit;
end;
begin
Source := AnyGraphicClass.Create;
(* Для примера *)
try
Image1.Picture.Bitmap.Assign(Source);
finally
Source.Free;
end;
end;

И не забудь RxGif присобачить а то gif не получишь.

---

← →
GIL ©   (2003-05-08 15:55) [4]

есть одна небольшая проблема :( rx не устанавливается на D6, хватит-ли одного этого модуля?

---

← →
NAlexey ©   (2003-05-08 16:02) [5]

Не знаю, не пробывал. Но наверное хватит. Может еще RXGraph понадобится. Короче надо пробывать.

---

← →
GIL ©   (2003-05-08 16:07) [6]

просто я пробовал ее подтянуть, а она за собой половину rx потянула

---

← →
NAlexey ©   (2003-05-08 16:08) [7]

На этот счет вытягивай код для работы с gif или оставь gif в покое.

---

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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.011 c