| Class TsPopupCalculator (unit sCalc) |
| Constructors |
constructor Create(AOwner: TComponent);| Functions |
procedure PopUp(const aValue: Double);
procedure CalculatePosition;
procedure CreateParams(var Params: TCreateParams);
procedure CancelButtonClick(Sender: TObject);
procedure FormDeactivate(Sender: TObject);
procedure OkButtonClick(Sender: TObject);| Properties |
property ParentControl : TControl
property Value : Double| Events |
event OnAccept : TNotifyEvent
event OnCancel : TNotifyEvent| Variables |
FOnAccept : TNotifyEvent;
FOnCancel : TNotifyEvent;
FParentControl : TControl;| Constructors |
constructor Create(AOwner: TComponent);TsPopupCalculator
| Functions |
procedure PopUp(const aValue: Double);If too far down, pop the calendar above the control
procedure CalculatePosition;
procedure CreateParams(var Params: TCreateParams);
procedure CancelButtonClick(Sender: TObject);to raise exception on error
procedure FormDeactivate(Sender: TObject);
procedure OkButtonClick(Sender: TObject);| Properties |
property ParentControl : TControl
property Value : Double| Events |
event OnAccept : TNotifyEvent
event OnCancel : TNotifyEvent| Variables |
FOnAccept : TNotifyEvent;
FOnCancel : TNotifyEvent;
FParentControl : TControl;