TGIFExportFormat.GIF
TGIFExportFormat
function GIF: TGIFImage;
Unit
TeeGIF
Description
Uses Anders Melander's GIFImage components to define characteristics for the GIF image.
Anders has donated GIFImage to the Jedi project, http://www.delphi-jedi.org/, who now co-ordinate support issues.
Example.
Uses TeeGIF, GIFImage;
procedure TForm1.Button1Click(Sender: TObject);
var tmpGIF : TGIFImage;
begin
tmpGIF:=TGIFImage.Create;
With tmpGIF do
begin
Compression:=gcLZW;
DitherMode:=dmStucki;
ColorReduction:=rmQuantizeWindows;
Assign(Chart1.TeeCreateBitmap(Chart1.Color,Rect(0,0,Chart1.Width,Chart1.Height)));
SaveToFile('c:\tempCharts\Chart1.gif');
end;
end;
The above is encapsulated in TeeChart's TGIFExport class