Unit GifDecl |
Classes |
EGifException - TDecodeRecord
TByteBuffer - TExtensionList
TCodeTable - TByteBuffer
TEncodedBytes - TCodeTable
TExtension - TExtensionRecord
TExtensionList - TExtension } { declared as class to make storage in a TList possible
Functions |
CheckType - TEncodedBytes
TEncodedBytes.
NextLineNo - Finds out whether the file is a gif or bmp (or unknown) file
CheckType
Types |
TApplicationExtension
TDecodeRecord
TDisposalMethod
TExtensionRecord
TExtensionType
TGifHeader
TGraphicControlExtension
TGraphicFileType
TImageDescriptor
TLogicalScreenDescriptor
TPlainTextExtension
Constants |
CodeMask
CodeTableSize
ExtensionIntroducer
idColorTableSize
idInterlaced
idLocalColorTable
idReserved
idSort
ImageSeparator
lsdColorResolution
lsdColorTableSize
lsdGlobalColorTable
lsdSort
Trailer
Variables |
Functions |
TEncodedBytes.Finish } (***** end of methods of TEncodedBytes
CheckType
Types |
TApplicationExtension = recordTPlainTextExtension
BlockSize : Byte;
ApplicationIdentifier : array[1..8] of Byte;
AppAuthenticationCode : array[1..3] of Byte;
AppData : TStringList;
end;
TDecodeRecord = recordWho knows JPG and others will be available some day
BitsLeft : Integer;
CurrByte : Longint;
CurrentY : Integer;
InterlacePass : Integer;
LZWCodeSize : Byte;
CurrCodeSize : Integer;
ClearCode : Integer;
EndingCode : Integer;
HighCode : Word;
end;
TDisposalMethod = (dmNone, dmNotDispose, dmRestoreBackgroundColor, dmRestorePrevious, dm4, dm5, dm6, dm7);
TExtensionRecord = recordTApplicationExtension
end;
TExtensionType = (etGCE, etPTE, etAPPE, etCE);TImageDescriptor
TGifHeader = record
Signature : array[0..2] of char;
Version : array[0..2] of char;
end;
TGraphicControlExtension = record
BlockSize : byte;
PackedFields : Byte;
DelayTime : Word;
TransparentColorIndex : Byte;
Terminator : Byte;
end;
TGraphicFileType = (BMP, GIF, unknown);bit masks for use with Next code
TImageDescriptor = recordTLogicalScreenDescriptor
ImageLeftPos : word;
ImageTopPos : word;
ImageWidth : word;
ImageHeight : word;
PackedFields : byte;
end;
TLogicalScreenDescriptor = recordTGifHeader
ScreenWidth : word;
ScreenHeight : word;
PackedFields : byte;
BackGroundColorIndex : byte;
AspectRatio : byte;
end;
TPlainTextExtension = recordTGraphicControlExtension
BlockSize : byte;
Left : Word;
Top : Word;
Width : Word;
Height : Word;
CellWidth : Byte;
CellHeight : Byte;
TextFGColorIndex : Byte;
TextBGColorIndex : Byte;
PlainTextData : TStringList;
end;
Constants |
Variables |