Class TFormDemo (unit Unit1)
Inherits from
TForm
Constructors
Functions
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
procedure Button3Click(Sender: TObject);
procedure CheckBoxStepClick(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction);
procedure FormShow(Sender: TObject);
procedure StateBoolean1EnterState(Sender: TStateBoolean; var Result: Boolean);
procedure StateMachine1ChangeState(Sender: TStateMachine; FromState, ToState: TStateControl);
procedure StateMachine1Exception(Sender: TStateMachine; Node: TStateControl; Error: Exception);
procedure StateNode1EnterState(Sender: TObject);
procedure StateNode2EnterState(Sender: TObject);
procedure StateNode3EnterState(Sender: TObject);
procedure StateNodeResetEnterState(Sender: TObject);
procedure StateStart1EnterState(Sender: TObject);
procedure StateTransitionLoopTransition(Sender: TObject);
Properties
Events
Variables
Button1 : TButton;
Button2 : TButton;
Button3 : TButton;
CheckBoxBomb : TCheckBox;
CheckBoxReset : TCheckBox;
CheckBoxStep : TCheckBox;
StateBoolean1 : TStateBoolean;
StateLink1 : TStateLink;
StateLink2 : TStateLink;
StateMachine1 : TStateMachine;
StateNode1 : TStateNode;
StateNode2 : TStateNode;
StateNode3 : TStateNode;
StateNodeReset : TStateNode;
StateStart1 : TStateStart;
StateTransition1 : TStateTransition;
StateTransitionLoop : TStateTransition;
Constructors
Functions
procedure Button1Click(Sender: TObject);
procedure Button2Click(Sender: TObject);
procedure Button3Click(Sender: TObject);
procedure CheckBoxStepClick(Sender: TObject);
procedure FormClose(Sender: TObject; var Action: TCloseAction);
procedure FormShow(Sender: TObject);
procedure StateBoolean1EnterState(Sender: TStateBoolean; var Result: Boolean);
procedure StateMachine1ChangeState(Sender: TStateMachine; FromState, ToState: TStateControl);
procedure StateMachine1Exception(Sender: TStateMachine; Node: TStateControl; Error: Exception);
procedure StateNode1EnterState(Sender: TObject);
procedure StateNode2EnterState(Sender: TObject);
procedure StateNode3EnterState(Sender: TObject);
procedure StateNodeResetEnterState(Sender: TObject);
procedure StateStart1EnterState(Sender: TObject);
procedure StateTransitionLoopTransition(Sender: TObject);
Properties
Events
Variables
Button1 : TButton;
Button2 : TButton;
Button3 : TButton;
CheckBoxBomb : TCheckBox;
CheckBoxReset : TCheckBox;
CheckBoxStep : TCheckBox;
StateBoolean1 : TStateBoolean;
StateLink1 : TStateLink;
StateLink2 : TStateLink;
StateMachine1 : TStateMachine;
StateNode1 : TStateNode;
StateNode2 : TStateNode;
StateNode3 : TStateNode;
StateNodeReset : TStateNode;
StateStart1 : TStateStart;
StateTransition1 : TStateTransition;
StateTransitionLoop : TStateTransition;