Class TIconList (unit IcoList)

Inherits from

TPersistent

TIconList class

Constructors


constructor Create;

TIconList


Functions

function Add(Icon: TIcon): Integer;


function AddResource(Instance: THandle; ResId: PChar): Integer;


procedure Assign(Source: TPersistent);


procedure BeginUpdate;


procedure Clear;


procedure Delete(Index: Integer);


destructor Destroy;


procedure EndUpdate;


procedure Exchange(Index1, Index2: Integer);


function IndexOf(Icon: TIcon): Integer;


procedure Insert(Index: Integer; Icon: TIcon);


procedure InsertResource(Index: Integer; Instance: THandle; ResId: PChar);


procedure LoadResource(Instance: THandle; const ResIds: array of PChar);


procedure Move(CurIndex, NewIndex: Integer);


procedure Changed;


procedure DefineProperties(Filer: TFiler);


function Get(Index: Integer): TIcon;


function GetCount: Integer;


procedure Put(Index: Integer; Icon: TIcon);


function AddIcon(Icon: TIcon): Integer;


procedure IconChanged(Sender: TObject);


procedure ReadData(Stream: TStream);


procedure SetUpdateState(Updating: Boolean);


procedure WriteData(Stream: TStream);


Properties

property Count : Integer


property Icons : TIcon


Events

event OnChange : TNotifyEvent


Variables

FList : TList;


FOnChange : TNotifyEvent;


FUpdateCount : Integer;



Constructors


constructor Create;

TIconList


Functions


function Add(Icon: TIcon): Integer;


function AddResource(Instance: THandle; ResId: PChar): Integer;


procedure Assign(Source: TPersistent);


procedure BeginUpdate;


procedure Clear;


procedure Delete(Index: Integer);


destructor Destroy;


procedure EndUpdate;


procedure Exchange(Index1, Index2: Integer);


function IndexOf(Icon: TIcon): Integer;


procedure Insert(Index: Integer; Icon: TIcon);


procedure InsertResource(Index: Integer; Instance: THandle; ResId: PChar);


procedure LoadResource(Instance: THandle; const ResIds: array of PChar);


procedure Move(CurIndex, NewIndex: Integer);


procedure Changed;


procedure DefineProperties(Filer: TFiler);


function Get(Index: Integer): TIcon;


function GetCount: Integer;


procedure Put(Index: Integer; Icon: TIcon);


function AddIcon(Icon: TIcon): Integer;


procedure IconChanged(Sender: TObject);


procedure ReadData(Stream: TStream);


procedure SetUpdateState(Updating: Boolean);


procedure WriteData(Stream: TStream);


Properties


property Count : Integer


property Icons : TIcon


Events


event OnChange : TNotifyEvent


Variables


FList : TList;


FOnChange : TNotifyEvent;


FUpdateCount : Integer;