Class TmsBusinessInfo (unit Msvcls)

Inherits from

TPersistent

Constructors


constructor Create;

TmsBusinessInfo


Functions

procedure Assign(Value : TPersistent);


procedure Clear;


destructor Destroy;


procedure LoadFromStrings(Strings : TStrings);


procedure SaveToStrings(Strings : TStrings);


procedure SetCompany(Value : TmsCompanyRec);


Properties

property Company : TmsCompanyRec


property Role : string


property Title : string


Events

Variables

FCompany : TmsCompanyRec;


FRole : string;


FTitle : string;



Constructors


constructor Create;

TmsBusinessInfo


Functions


procedure Assign(Value : TPersistent);


procedure Clear;


destructor Destroy;


procedure LoadFromStrings(Strings : TStrings);


procedure SaveToStrings(Strings : TStrings);


procedure SetCompany(Value : TmsCompanyRec);


Properties


property Company : TmsCompanyRec


property Role : string


property Title : string


Events


Variables


FCompany : TmsCompanyRec;


FRole : string;


FTitle : string;