Class TStateNode (unit statmach) |
Inherits from
TStateNodeBase
constructor Create(AOwner: TComponent);
- Public declarations
****************************************************************************** ** ** TStateNode **
destructor Destroy;
ControlStyle := [csCaptureMouse, { csOpaque, } csDoubleClicks];
function HitTest(Mouse: TPoint): TStateConnector;
procedure PaintConnector;
function DoDefault: Boolean;
procedure DoOnEnter;
Only assign value if non-nil
procedure DoOnExit;
procedure Notification(AComponent: TComponent;
Operation: TOperation);
procedure PrepareCanvas(Element: TVisualElement; Canvas: TCanvas);
Protected declarations
procedure SetBounds(ALeft, ATop, AWidth, AHeight: Integer);
procedure SetDefaultTransition(Value: TStateControl);
procedure SetNextState(Value :TStateControl);
NextState is obsolete!
property DefaultTransition : TStateControl
property NextState : TStateControl
NextState is obsolete!
event OnEnterState : TNotifyEvent
Published declarations
event OnExitState : TNotifyEvent
FDefaultTransition : TStateControl;
FOnEnterState : TNotifyEvent;
Private declarations
FOnExitState : TNotifyEvent;
FToConnector : TStateConnector;
constructor Create(AOwner: TComponent);
Public declarations
****************************************************************************** ** ** TStateNode **
destructor Destroy;
ControlStyle := [csCaptureMouse, { csOpaque, } csDoubleClicks];
function HitTest(Mouse: TPoint): TStateConnector;
procedure PaintConnector;
function DoDefault: Boolean;
procedure DoOnEnter;
Only assign value if non-nil
procedure DoOnExit;
procedure Notification(AComponent: TComponent;
Operation: TOperation);
procedure PrepareCanvas(Element: TVisualElement; Canvas: TCanvas);
Protected declarations
procedure SetBounds(ALeft, ATop, AWidth, AHeight: Integer);
procedure SetDefaultTransition(Value: TStateControl);
procedure SetNextState(Value :TStateControl);
NextState is obsolete!
property DefaultTransition : TStateControl
property NextState : TStateControl
NextState is obsolete!
event OnEnterState : TNotifyEvent
Published declarations
event OnExitState : TNotifyEvent
FDefaultTransition : TStateControl;
FOnEnterState : TNotifyEvent;
Private declarations
FOnExitState : TNotifyEvent;
FToConnector : TStateConnector;