Indy 9
|
TIdIRCUser = class(TCollectionItem)
property Address: String;
property Data: TObject;
property Nick: String;
property Reason: String;
constructor Create(AClient: TIdIRC; ANick: String; AAddress: String); reintroduce;
destructor Destroy; override;
procedure Say(AMsg: String);