| Class TNetID (unit Netuser2) |
TComponent
| Constructors |
constructor Create(AOwner: TComponent);| Functions |
procedure Loaded;
procedure SetID(UserId: string);
procedure SetName(UserName : String);
procedure SetStationNumber(StationNumber: byte);| Properties |
property StationNumber : byte
property UserID : string
property UserName : string| Events |
| Variables |
FDummy : String;
FStationNum : byte;
FUserID : String;
FUserName : String;| Constructors |
constructor Create(AOwner: TComponent);Public declarations
| Functions |
procedure Loaded;
procedure SetID(UserId: string);======================================================================
procedure SetName(UserName : String);======================================================================
procedure SetStationNumber(StationNumber: byte);======================================================================} { Set my logical Station(connection)-Number
| Properties |
property StationNumber : bytePublished declarations
property UserID : string
property UserName : string| Events |
| Variables |
FDummy : String;
FStationNum : byte;Private declarations
FUserID : String;
FUserName : String;