Class TListDistributor (unit INITree)

Inherits from

TListDistributorProperty

Constructors


constructor Create(AOwner:TComponent);



Functions

destructor Destroy;


function GetList(listS:TStringList;Node,Data:TObject;emptyIt:Boolean):LongInt;


function DoGetList(listS:TStringList):LongInt;


procedure Notification(AComponent:TComponent;Operation:TOperation);


function GetParamName:string;


procedure SetNextLevel(LD:TListDistributorProperty);


procedure SetNOfParameters(pNo:Integer);


procedure SetVerbs(vList:TStringList);


Properties

property ImageIndex : Integer


property NextLevel : TListDistributorProperty


property NOfParameters : Integer


property ParamName : string


property Verbs : TStringList


property Editable : Boolean


Events

event OnCustomizeList : TEventOnCustomizeList


event OnDragDrop : TEventOnDragDrop


event OnDragOver : TEventOnDragOver


event OnEnableVerb : TEventOnEnableVerb


event OnExecuteVerb : TEventOnExecuteVerb


event OnPaste : TEventOnPaste


event OnEdited : TEventOnEdited


Variables

FData : TObject;


FNOfParameters : Integer;


FEditable : Boolean;


FImageIndex : Integer;


FNextLevel : TListDistributorProperty;


FOnCustomizeList : TEventOnCustomizeList;


FOnDragDrop : TEventOnDragDrop;


FOnDragOver : TEventOnDragOver;


FOnEdited : TEventOnEdited;


FOnEnableVerb : TEventOnEnableVerb;


FOnExecuteVerb : TEventOnExecuteVerb;


FOnPaste : TEventOnPaste;


FParamName : string;


FVerbs : TStringList;



Constructors


constructor Create(AOwner:TComponent);


Functions


destructor Destroy;


function GetList(listS:TStringList;Node,Data:TObject;emptyIt:Boolean):LongInt;


function DoGetList(listS:TStringList):LongInt;


procedure Notification(AComponent:TComponent;Operation:TOperation);


function GetParamName:string;


procedure SetNextLevel(LD:TListDistributorProperty);


procedure SetNOfParameters(pNo:Integer);


procedure SetVerbs(vList:TStringList);


Properties


property ImageIndex : Integer


property NextLevel : TListDistributorProperty


property NOfParameters : Integer


property ParamName : string


property Verbs : TStringList


property Editable : Boolean


Events


event OnCustomizeList : TEventOnCustomizeList


event OnDragDrop : TEventOnDragDrop


event OnDragOver : TEventOnDragOver


event OnEnableVerb : TEventOnEnableVerb


event OnExecuteVerb : TEventOnExecuteVerb


event OnPaste : TEventOnPaste


event OnEdited : TEventOnEdited


Variables


FData : TObject;


FNOfParameters : Integer;


FEditable : Boolean;


FImageIndex : Integer;


FNextLevel : TListDistributorProperty;


FOnCustomizeList : TEventOnCustomizeList;


FOnDragDrop : TEventOnDragDrop;


FOnDragOver : TEventOnDragOver;


FOnEdited : TEventOnEdited;


FOnEnableVerb : TEventOnEnableVerb;


FOnExecuteVerb : TEventOnExecuteVerb;


FOnPaste : TEventOnPaste;


FParamName : string;


FVerbs : TStringList;