| Class TCurtain (unit Curtain) |
TComponent
| Constructors |
constructor Create(AOwner: TComponent);| Functions |
procedure curtainonoff(newstate : curtainstate);
procedure versionwrite(newversion : string);| Properties |
property Version : string| Events |
event onoff : curtainstate| Variables |
fonoff : curtainstate;
fVersion : string;| Constructors |
constructor Create(AOwner: TComponent);**********************************************************************************) (***********************************************************************************) (
| Functions |
procedure curtainonoff(newstate : curtainstate);**********************************************************************************)
procedure versionwrite(newversion : string);**********************************************************************************)
| Properties |
property Version : string| Events |
event onoff : curtainstate| Variables |
fonoff : curtainstate;
fVersion : string;