TdxCustomChartControl.ExportToGIF(TStream,Integer,Integer) Method

Exports content to a stream in GIF format.

Declaration

procedure ExportToGIF(const AStream: TStream; AImageWidth: Integer = 0; AImageHeight: Integer = 0); overload;

Parameters

Name	Type	Description
AStream	TStream	The target stream.
AImageWidth	Integer	Optional. The exported image width, in pixels. If this parameter is omitted, the target image width matches the current pixel width of the Chart control client area on the parent form. The export procedure stretches or shrinks the Chart control layout horizontally to fit the resulting image into the target width. All font sizes remain unchanged. If title or label text does not fit into the corresponding visual Chart element, the Chart control crops the text and ends it with an ellipsis in the exported layout.
AImageHeight	Integer	Optional. The exported image height, in pixels. If this parameter is omitted, the target image height matches the current pixel height of the Chart control client area on the parent form. The export procedure stretches or shrinks the Chart control layout vertically to fit the resulting image into the target height. All font sizes remain unchanged. If title or label text does not fit into the corresponding visual Chart element, the Chart control crops the text and ends it with an ellipsis in the exported layout.

Remarks

Call the ExportToGIF procedure to export content of the Chart control client area to a stream in GIF format. The resulting image size matches the actual pixel dimensions of the Chart control client area on a form.

Adjust Target Image Dimensions

You can pass required target pixel dimensions for the resulting image as optional AImageWidth and AImageHeight parameters. In this case, the ExportToGIF procedure resizes all visible diagrams to fit into the target dimensions. All font sizes remain unchanged.

Code Example

The following code example exports shrunk content of the Chart control client area whose original dimensions on the parent form are 600 by 700 pixels:

Delphi

var
  AStream: TMemoryStream;
begin
  dxSavePictureDialog1.Execute(Handle);
  if dxSavePictureDialog1.FileName = '' then Exit;
  AStream := TMemoryStream.Create;
  try
    dxChartControl1.ExportToGIF(AStream, 400, 500);
    AStream.SaveToFile(dxSavePictureDialog1.FileName);
  finally
    AStream.Free;
  end;
end;

C++

  TMemoryStream *AStream = nullptr;
  // ...
  dxSavePictureDialog1->Execute(Handle);
  if(dxSavePictureDialog1->FileName == "") { return; }
  AStream = new TMemoryStream();
  try
  {
    dxChartControl1->ExportToGIF(AStream, 400, 500);
    AStream->SaveToFile(dxSavePictureDialog1->FileName);
  }
  __finally
    delete AStream;