Class TLstAttributes

Unit

Declaration

type TLstAttributes = class(TObject)

Description

Methods

Overview

	constructor Create(Owned: boolean; prmSize: Integer);
	constructor CreateFromStream(prmStream: TStream);
	destructor Destroy; override;
	procedure Add(prmAtt: TAttribute);
	procedure Assign(prmSource: TLstAttributes);
	procedure Clear();
	procedure FlashLstAtt(prmDest: TStrings);
	function GetFromName(prmName: string): TAttribute;
	function GetIndex(prmAtt: TAttribute): integer;
	function isAllCategory(prmCat: TEnumCatAttribut): boolean;
	procedure SaveToStream(prmStream: TStream);

Description

constructor Create(Owned: boolean; prmSize: Integer);

constructor CreateFromStream(prmStream: TStream);

charger à partir d'un flux

destructor Destroy; override;

procedure Add(prmAtt: TAttribute);

ajouter un nouvel attribut en fin de liste

procedure Assign(prmSource: TLstAttributes);

ajouter une série d'attributs

procedure Clear();

vider la liste - selon que l'on est proprio ou non, l'attribut est détruit

procedure FlashLstAtt(prmDest: TStrings);

envoyer l'ensemble d'attributs dans une TStrings

function GetFromName(prmName: string): TAttribute;

chercher un attribut à partir de son nom

function GetIndex(prmAtt: TAttribute): integer;

récupérer le numéro de l'attribut

function isAllCategory(prmCat: TEnumCatAttribut): boolean;

teste si tous les attributs sont d'un type donné

procedure SaveToStream(prmStream: TStream);

sauver dans un flux

Properties

Overview

	property Attribute[i: Integer]: TAttribute;
	property Count: Integer;
	property LstAtt: TObjectList;
	property Size: Integer;

Description

property Attribute[i: Integer]: TAttribute;

property Count: Integer;

properties

property LstAtt: TObjectList;

property Size: Integer;