Unit 'FPReadTGA'	Package
[Overview][Constants][Classes][Index]	[#fcl-image]

TFPReaderTarga

[Properties (by Name)] [Methods (by Name)] [Events (by Name)]

Declaration

Source position: fpreadtga.pp line 38

type TFPReaderTarga = class(TFPCustomImageReader)

protected

Header: TTargaHeader;

AlphaBits: Byte;

Identification: ShortString;

Compressed: Boolean;

BottomUp: Boolean;

BytesPerPixel: Byte;

FPalette: PFPColor;

FScanLine: PByte;

FLineSize: Integer;

FPaletteSize: Integer;

FBlockCount: Integer;

FPixelCount: Integer;

FLastPixel: array [0..3] of Byte;

procedure AnalyzeHeader();

procedure CreateGrayPalette;

procedure ReadPalette();

procedure ReadScanLine(); virtual;

procedure WriteScanLine(); virtual;

procedure InternalRead(); override;

function InternalCheck(); override;

public

constructor Create; override;

destructor Destroy; override;

end;

Inheritance

TFPReaderTarga

|

TFPCustomImageReader

|

TFPCustomImageHandler

|

TObject