Class TBGRAOpenRasterDocument

Unit

Declaration

type TBGRAOpenRasterDocument = class(TBGRALayeredBitmap)

Description

Layered image using OpenRaster format

Hierarchy

Overview

Methods

Public constructor Create; overload; override;
Public constructor Create(AWidth, AHeight: integer); overload; override;
Public function CheckMimeType(AStream: TStream): boolean;
Protected function AddLayerFromMemoryStream(ALayerFilename: string): integer;
Protected function CopyBitmapToMemoryStream(ABitmap: TBGRABitmap; AFilename: string): boolean;
Protected function CopyRasterLayerToMemoryStream(ALayerIndex: integer; ALayerFilename: string): boolean;
Protected function GetMemoryStream(AFilename: string): TMemoryStream;
Protected function GetMemoryStreamAsString(AFilename: string): string;
Protected function GetMimeType: string; override;
Public procedure Clear; override;
Public procedure LoadFlatImageFromStream(AStream: TStream; out ANbLayers: integer; out ABitmap: TBGRABitmap);
Public procedure LoadFromFile(const filenameUTF8: string); override;
Public procedure LoadFromStream(AStream: TStream); override;
Public procedure SaveToFile(const filenameUTF8: string); override;
Public procedure SaveToStream(AStream: TStream); override;
Protected procedure AnalyzeZip; virtual;
Protected procedure ClearFiles;
Protected procedure CopySVGToMemoryStream(ASVG: TBGRASVG; ASVGMatrix: TAffineMatrix; AOutFilename: string; out AOffset: TPoint);
Protected procedure CopyThumbnailToMemoryStream(AMaxWidth, AMaxHeight: integer);
Protected procedure InternalLoadFromStream(AStream: TStream);
Protected procedure InternalSaveToStream(AStream: TStream);
Protected procedure PrepareZipToSave; virtual;
Protected procedure SetMemoryStream(AFilename: string; AStream: TMemoryStream);
Protected procedure SetMemoryStreamAsString(AFilename: string; AContent: string);
Protected procedure UnzipFromFile(AFilenameUTF8: string);
Protected procedure UnzipFromStream(AStream: TStream; AFileList: TStrings = nil);
Protected Procedure ZipOnCloseInputStream(Sender : TObject; var AStream : TStream);
Protected Procedure ZipOnCreateStream(Sender : TObject; var AStream : TStream; AItem : TFullZipFileEntry);
Protected Procedure ZipOnDoneStream(Sender : TObject; var AStream : TStream; AItem : TFullZipFileEntry);
Protected Procedure ZipOnOpenInputStream(Sender : TObject; var AStream : TStream);
Protected procedure ZipToFile(AFilenameUTF8: string);
Protected procedure ZipToStream(AStream: TStream);

Properties

Public property MimeType : string read GetMimeType write SetMimeType;
Public property StackXML : TXMLDocument read FStackXML;

Description

Methods

Public constructor Create; overload; override;

This item has no description. Showing description inherited from TGraphic.Create.

Create an empty instance

Public constructor Create(AWidth, AHeight: integer); overload; override;

This item has no description.

Public function CheckMimeType(AStream: TStream): boolean;

This item has no description.

Protected function AddLayerFromMemoryStream(ALayerFilename: string): integer;

This item has no description.

Protected function CopyBitmapToMemoryStream(ABitmap: TBGRABitmap; AFilename: string): boolean;

This item has no description.

Protected function CopyRasterLayerToMemoryStream(ALayerIndex: integer; ALayerFilename: string): boolean;

This item has no description.

Protected function GetMemoryStream(AFilename: string): TMemoryStream;

This item has no description.

Protected function GetMemoryStreamAsString(AFilename: string): string;

This item has no description.

Protected function GetMimeType: string; override;

This item has no description. Showing description inherited from TGraphic.GetMimeType.

Get mimetype of current graphic class

Public procedure Clear; override;

This item has no description. Showing description inherited from TGraphic.Clear.

Clears the content

Public procedure LoadFlatImageFromStream(AStream: TStream; out ANbLayers: integer; out ABitmap: TBGRABitmap);

This item has no description.

Public procedure LoadFromFile(const filenameUTF8: string); override;

This item has no description. Showing description inherited from TGraphic.LoadFromFile.

Load the content from a given file

Public procedure LoadFromStream(AStream: TStream); override;

This item has no description. Showing description inherited from TGraphic.LoadFromStream.

Load the content from a given stream

Public procedure SaveToFile(const filenameUTF8: string); override;

This item has no description. Showing description inherited from TGraphic.SaveToFile.

Saves the content to a file

Public procedure SaveToStream(AStream: TStream); override;

This item has no description. Showing description inherited from TGraphic.SaveToStream.

Saves the content into a given stream

Protected procedure AnalyzeZip; virtual;

This item has no description.

Protected procedure ClearFiles;

This item has no description.

Protected procedure CopySVGToMemoryStream(ASVG: TBGRASVG; ASVGMatrix: TAffineMatrix; AOutFilename: string; out AOffset: TPoint);

This item has no description.

Protected procedure CopyThumbnailToMemoryStream(AMaxWidth, AMaxHeight: integer);

This item has no description.

Protected procedure InternalLoadFromStream(AStream: TStream);

This item has no description.

Protected procedure InternalSaveToStream(AStream: TStream);

This item has no description.

Protected procedure PrepareZipToSave; virtual;

This item has no description.

Protected procedure SetMemoryStream(AFilename: string; AStream: TMemoryStream);

This item has no description.

Protected procedure SetMemoryStreamAsString(AFilename: string; AContent: string);

This item has no description.

Protected procedure UnzipFromFile(AFilenameUTF8: string);

This item has no description.

Protected procedure UnzipFromStream(AStream: TStream; AFileList: TStrings = nil);

This item has no description.

Protected Procedure ZipOnCloseInputStream(Sender : TObject; var AStream : TStream);

This item has no description.

Protected Procedure ZipOnCreateStream(Sender : TObject; var AStream : TStream; AItem : TFullZipFileEntry);

This item has no description.

Protected Procedure ZipOnDoneStream(Sender : TObject; var AStream : TStream; AItem : TFullZipFileEntry);

This item has no description.

Protected Procedure ZipOnOpenInputStream(Sender : TObject; var AStream : TStream);

This item has no description.

Protected procedure ZipToFile(AFilenameUTF8: string);

This item has no description.

Protected procedure ZipToStream(AStream: TStream);

This item has no description.

Properties

Public property MimeType : string read GetMimeType write SetMimeType;

This item has no description.

Public property StackXML : TXMLDocument read FStackXML;

This item has no description.