TFPReportCustomImage

type TFPReportCustomImage = class(TFPReportElement)

protected

  procedure DoWriteLocalProperties(); override;

  procedure RecalcLayout; override;

  function PrepareObject(); override;

  property Image: TFPCustomImage; [rw]

  property ImageID: Integer; [rw]

  property Stretched: Boolean; [rw]

  property FieldName: TFPReportString; [rw]

  property DBImageType: TFPReportString; [rw]

public

  constructor Create(); override;

  destructor Destroy; override;

  class function ElementType; override;

  function GetRTImageID;

  function GetRTImage;

  procedure Assign(); override;

  procedure ReadElement(); override;

  procedure LoadFromFile();

  procedure LoadFromStream();

  procedure LoadPNGFromStream();

  procedure LoadImage();

end;

TFPReportCustomImage

TFPReportElement

TFPReportComponent

TObject