Class TBGRAIconCursor

Unit

Declaration

type TBGRAIconCursor = class(TMultiFileContainer)

Description

An icon or cursor, with multiple images, one for each size and depth

Hierarchy

Overview

Fields

Protected FFileType: TBGRAImageFormat;
Protected FLoading: boolean;

Methods

Public constructor Create(AFileType: TBGRAImageFormat); overload;
Public function Add(ABitmap: TBGRACustomBitmap; ABitDepth: integer; AOverwrite: boolean = false): integer; overload;
Public function Add(AContent: TStream; AOverwrite: boolean = false; AOwnStream: boolean = true): integer; overload;
Public function GetBestFitBitmap(AWidth,AHeight: integer): TBGRACustomBitmap;
Public function GetBestFitIndex(AWidth,AHeight: integer): integer;
Public function GetBitmap(AIndex: integer): TBGRACustomBitmap;
Public function IndexOf(AWidth,AHeight,ABitDepth: integer): integer; overload;
Protected function CreateEntry(AName: utf8string; AExtension: utf8string; AContent: TStream): TMultiFileEntry; override;
Protected function ExpectedMagic: Word;
Public procedure Assign(Source: TPersistent); override;
Public procedure LoadFromStream(AStream: TStream); override;
Public procedure SaveToStream(ADestination: TStream); override;
Protected procedure AssignTo(Dest: TPersistent); override;
Protected procedure Init; override;

Properties

Public property BitDepth[AIndex: integer]: integer read GetBitDepthAt;
Public property FileType: TBGRAImageFormat read FFileType write SetFileType;
Public property Height[AIndex: integer]: integer read GetHeightAt;
Public property HotSpot[AIndex: integer]: TPoint read GetHotSpotAtAt write SetHotSpotAt;
Public property Width[AIndex: integer]: integer read GetWidthAt;

Description

Fields

Protected FFileType: TBGRAImageFormat;

This item has no description.

Protected FLoading: boolean;

This item has no description.

Methods

Public constructor Create(AFileType: TBGRAImageFormat); overload;

This item has no description.

Public function Add(ABitmap: TBGRACustomBitmap; ABitDepth: integer; AOverwrite: boolean = false): integer; overload;

This item has no description.

Public function Add(AContent: TStream; AOverwrite: boolean = false; AOwnStream: boolean = true): integer; overload;

This item has no description.

Public function GetBestFitBitmap(AWidth,AHeight: integer): TBGRACustomBitmap;

This item has no description.

Public function GetBestFitIndex(AWidth,AHeight: integer): integer;

This item has no description.

Public function GetBitmap(AIndex: integer): TBGRACustomBitmap;

This item has no description.

Public function IndexOf(AWidth,AHeight,ABitDepth: integer): integer; overload;

This item has no description.

Protected function CreateEntry(AName: utf8string; AExtension: utf8string; AContent: TStream): TMultiFileEntry; override;

This item has no description.

Protected function ExpectedMagic: Word;

This item has no description.

Public procedure Assign(Source: TPersistent); override;

This item has no description.

Public procedure LoadFromStream(AStream: TStream); override;

This item has no description.

Public procedure SaveToStream(ADestination: TStream); override;

This item has no description.

Protected procedure AssignTo(Dest: TPersistent); override;

This item has no description.

Protected procedure Init; override;

This item has no description.

Properties

Public property BitDepth[AIndex: integer]: integer read GetBitDepthAt;

This item has no description.

Public property FileType: TBGRAImageFormat read FFileType write SetFileType;

This item has no description.

Public property Height[AIndex: integer]: integer read GetHeightAt;

This item has no description.

Public property HotSpot[AIndex: integer]: TPoint read GetHotSpotAtAt write SetHotSpotAt;

This item has no description.

Public property Width[AIndex: integer]: integer read GetWidthAt;

This item has no description.