خلفيات ملونة لصور 'tgifimage'

[SMP3]

هذا حل على السريع

PHP كود :

var gif : TGifImage ;
bmp:TBitmap;
begin
bmp:=TBitmap.Create;
bmp.SetSize(50,50);
bmp.Canvas.Brush.Color:=clRed;
bmp.Canvas.FillRect(Rect(0,0,50,50));

gif :=TGifImage.Create ;
gif.SetSize(50,50);
gif.Assign(bmp);
bmp.Free;
gif.SaveToFile('MyFile.gif');
gif.Free;
end;