mbshareat
دوشنبه 21 اسفند 1391, 18:47 عصر
سلام بر همگی
یه برنامه دارم که بیت مپ رو با استفاده از یونیت GifImage با فرمت Gif ذخیره می کنم.با این کد:
Use
GIFImage;
procedure TMainForm.ConvertBMP2GIF(B:TBitmap;GifFileName:Str ing);
var
G: TGIFImage;
begin
G := TGifImage.Create;
GIFImageDefaultColorReduction:=rmQuantize;
G.Assign(B);
G.SaveToFile(GifFileName);
G.Free;
end;
تو نسخه قدیم دلفی مشکلی ندارم (البته یه وقتهایی کیفیت رنگها بهینه نیست!)
اما تو دلفی XE2 با یونیت GifImage مشکل داره و ایراد می گیره که انتساب رو نمیتونه انجام بده .
با توجه به اینکه Image توی دلفی نسخه بالا میتونه Gif رو نشون بده راهی هست که بیت مپ رو رو به فرمت Gif تبدیل و ذخیره کنم؟
یه برنامه دارم که بیت مپ رو با استفاده از یونیت GifImage با فرمت Gif ذخیره می کنم.با این کد:
Use
GIFImage;
procedure TMainForm.ConvertBMP2GIF(B:TBitmap;GifFileName:Str ing);
var
G: TGIFImage;
begin
G := TGifImage.Create;
GIFImageDefaultColorReduction:=rmQuantize;
G.Assign(B);
G.SaveToFile(GifFileName);
G.Free;
end;
تو نسخه قدیم دلفی مشکلی ندارم (البته یه وقتهایی کیفیت رنگها بهینه نیست!)
اما تو دلفی XE2 با یونیت GifImage مشکل داره و ایراد می گیره که انتساب رو نمیتونه انجام بده .
با توجه به اینکه Image توی دلفی نسخه بالا میتونه Gif رو نشون بده راهی هست که بیت مپ رو رو به فرمت Gif تبدیل و ذخیره کنم؟