Class TGIFTextExtension (unit GIFImage)

Inherits from

TGIFExtension

Constructors


constructor Create(ASubImage: TGIFSubImage);

****************************************************************************** ** ** TGIFTextExtension **


Functions

destructor Destroy;


procedure LoadFromStream(Stream: TStream);


procedure SaveToStream(Stream: TStream);


function GetBackgroundColor: TColor;


function GetBounds(Index: integer): WORD;


function GetCharWidthHeight(Index: integer): BYTE;


function GetColorIndex(Index: integer): BYTE;


function GetExtensionType: TGIFExtensionType;


function GetForegroundColor: TColor;


procedure SetBackgroundColor(Color: TColor);


procedure SetBounds(Index: integer; Value: WORD);

To avoid compiler warnings

procedure SetCharWidthHeight(Index: integer; Value: BYTE);

To avoid compiler warnings

procedure SetColorIndex(Index: integer; Value: BYTE);

To avoid compiler warnings

procedure SetForegroundColor(Color: TColor);


Properties

property BackgroundColor : TColor


property BackgroundColorIndex : BYTE


property CharHeight : BYTE


property CharWidth : BYTE


property ForegroundColor : TColor


property ForegroundColorIndex : BYTE


property GridHeight : WORD


property GridWidth : WORD


property Left : WORD


property Text : TStrings


property Top : WORD


Events

Variables

FPlainTextExtension : TGIFPlainTextExtensionRec;


FText : TStrings;



Constructors


constructor Create(ASubImage: TGIFSubImage);

****************************************************************************** ** ** TGIFTextExtension **


Functions


destructor Destroy;


procedure LoadFromStream(Stream: TStream);


procedure SaveToStream(Stream: TStream);


function GetBackgroundColor: TColor;


function GetBounds(Index: integer): WORD;


function GetCharWidthHeight(Index: integer): BYTE;


function GetColorIndex(Index: integer): BYTE;


function GetExtensionType: TGIFExtensionType;


function GetForegroundColor: TColor;


procedure SetBackgroundColor(Color: TColor);


procedure SetBounds(Index: integer; Value: WORD);

To avoid compiler warnings


procedure SetCharWidthHeight(Index: integer; Value: BYTE);

To avoid compiler warnings


procedure SetColorIndex(Index: integer; Value: BYTE);

To avoid compiler warnings


procedure SetForegroundColor(Color: TColor);


Properties


property BackgroundColor : TColor


property BackgroundColorIndex : BYTE


property CharHeight : BYTE


property CharWidth : BYTE


property ForegroundColor : TColor


property ForegroundColorIndex : BYTE


property GridHeight : WORD


property GridWidth : WORD


property Left : WORD


property Text : TStrings


property Top : WORD


Events


Variables


FPlainTextExtension : TGIFPlainTextExtensionRec;


FText : TStrings;