2011-07-04 19:52:53 +00:00
|
|
|
object Form5: TForm5
|
2012-01-04 10:31:22 +00:00
|
|
|
Left = 491
|
2014-06-02 02:27:46 +00:00
|
|
|
Height = 280
|
2012-01-04 10:31:22 +00:00
|
|
|
Top = 355
|
2016-09-05 21:17:11 +02:00
|
|
|
Width = 640
|
2011-07-04 19:52:53 +00:00
|
|
|
Caption = 'Step 4'
|
2014-06-02 02:27:46 +00:00
|
|
|
ClientHeight = 280
|
2016-09-05 21:17:11 +02:00
|
|
|
ClientWidth = 640
|
2011-07-04 19:52:53 +00:00
|
|
|
Color = clBtnFace
|
|
|
|
|
OnClose = FormClose
|
|
|
|
|
OnCloseQuery = FormCloseQuery
|
|
|
|
|
OnCreate = FormCreate
|
2023-08-25 08:48:13 +02:00
|
|
|
LCLVersion = '2.2.2.0'
|
2011-07-04 19:52:53 +00:00
|
|
|
Visible = True
|
|
|
|
|
object Label1: TLabel
|
2014-06-02 02:27:46 +00:00
|
|
|
AnchorSideTop.Control = Button1
|
|
|
|
|
AnchorSideTop.Side = asrCenter
|
|
|
|
|
AnchorSideRight.Control = Button1
|
2016-09-05 21:17:11 +02:00
|
|
|
Left = 267
|
|
|
|
|
Height = 15
|
|
|
|
|
Top = 228
|
|
|
|
|
Width = 18
|
2014-06-02 02:27:46 +00:00
|
|
|
Anchors = [akTop, akRight]
|
|
|
|
|
BorderSpacing.Right = 3
|
2011-07-04 19:52:53 +00:00
|
|
|
Caption = '100'
|
|
|
|
|
ParentColor = False
|
|
|
|
|
end
|
|
|
|
|
object Label2: TLabel
|
2014-06-02 02:27:46 +00:00
|
|
|
AnchorSideTop.Control = Button1
|
|
|
|
|
AnchorSideTop.Side = asrCenter
|
|
|
|
|
AnchorSideRight.Control = Label1
|
2016-09-05 21:17:11 +02:00
|
|
|
Left = 227
|
|
|
|
|
Height = 15
|
|
|
|
|
Top = 228
|
|
|
|
|
Width = 37
|
2014-06-02 02:27:46 +00:00
|
|
|
Anchors = [akTop, akRight]
|
|
|
|
|
BorderSpacing.Right = 3
|
2011-07-04 19:52:53 +00:00
|
|
|
Caption = 'Ammo'
|
|
|
|
|
ParentColor = False
|
|
|
|
|
end
|
|
|
|
|
object Label3: TLabel
|
2014-06-02 02:27:46 +00:00
|
|
|
AnchorSideTop.Control = Button3
|
|
|
|
|
AnchorSideTop.Side = asrCenter
|
|
|
|
|
AnchorSideRight.Control = Label4
|
2016-09-05 21:17:11 +02:00
|
|
|
Left = 226
|
|
|
|
|
Height = 15
|
2014-06-02 02:27:46 +00:00
|
|
|
Top = 199
|
2016-09-05 21:17:11 +02:00
|
|
|
Width = 38
|
2014-06-02 02:27:46 +00:00
|
|
|
Anchors = [akTop, akRight]
|
|
|
|
|
BorderSpacing.Right = 3
|
2011-07-04 19:52:53 +00:00
|
|
|
Caption = 'Health:'
|
|
|
|
|
ParentColor = False
|
|
|
|
|
end
|
|
|
|
|
object Label4: TLabel
|
2014-06-02 02:27:46 +00:00
|
|
|
AnchorSideTop.Control = Button3
|
|
|
|
|
AnchorSideTop.Side = asrCenter
|
|
|
|
|
AnchorSideRight.Control = Button3
|
2016-09-05 21:17:11 +02:00
|
|
|
Left = 267
|
|
|
|
|
Height = 15
|
2014-06-02 02:27:46 +00:00
|
|
|
Top = 199
|
2016-09-05 21:17:11 +02:00
|
|
|
Width = 18
|
2014-06-02 02:27:46 +00:00
|
|
|
Anchors = [akTop, akRight]
|
|
|
|
|
BorderSpacing.Right = 3
|
2011-07-04 19:52:53 +00:00
|
|
|
Caption = '100'
|
|
|
|
|
ParentColor = False
|
|
|
|
|
end
|
|
|
|
|
object Label5: TLabel
|
2014-06-02 02:27:46 +00:00
|
|
|
AnchorSideLeft.Control = Button3
|
|
|
|
|
AnchorSideLeft.Side = asrBottom
|
|
|
|
|
AnchorSideTop.Control = Button3
|
|
|
|
|
AnchorSideTop.Side = asrCenter
|
2016-09-05 21:17:11 +02:00
|
|
|
Left = 355
|
|
|
|
|
Height = 15
|
2014-06-02 02:27:46 +00:00
|
|
|
Top = 199
|
2016-09-05 21:17:11 +02:00
|
|
|
Width = 32
|
2014-06-02 02:27:46 +00:00
|
|
|
BorderSpacing.Left = 3
|
2011-07-04 19:52:53 +00:00
|
|
|
Caption = '(float)'
|
|
|
|
|
ParentColor = False
|
|
|
|
|
end
|
|
|
|
|
object Label6: TLabel
|
2014-06-02 02:27:46 +00:00
|
|
|
AnchorSideLeft.Control = Button1
|
|
|
|
|
AnchorSideLeft.Side = asrBottom
|
|
|
|
|
AnchorSideTop.Control = Button1
|
|
|
|
|
AnchorSideTop.Side = asrCenter
|
2016-09-05 21:17:11 +02:00
|
|
|
Left = 355
|
|
|
|
|
Height = 15
|
|
|
|
|
Top = 228
|
|
|
|
|
Width = 45
|
2014-06-02 02:27:46 +00:00
|
|
|
BorderSpacing.Left = 3
|
2011-07-04 19:52:53 +00:00
|
|
|
Caption = '(double)'
|
|
|
|
|
ParentColor = False
|
|
|
|
|
end
|
|
|
|
|
object SpeedButton1: TSpeedButton
|
2014-06-02 02:27:46 +00:00
|
|
|
AnchorSideRight.Control = Owner
|
|
|
|
|
AnchorSideRight.Side = asrBottom
|
|
|
|
|
AnchorSideBottom.Control = Owner
|
|
|
|
|
AnchorSideBottom.Side = asrBottom
|
2016-09-05 21:17:11 +02:00
|
|
|
Left = 614
|
|
|
|
|
Height = 19
|
|
|
|
|
Top = 261
|
|
|
|
|
Width = 26
|
2014-06-02 02:27:46 +00:00
|
|
|
Anchors = [akRight, akBottom]
|
2016-09-05 21:17:11 +02:00
|
|
|
AutoSize = True
|
2011-07-04 19:52:53 +00:00
|
|
|
Caption = 'Skip'
|
|
|
|
|
Flat = True
|
|
|
|
|
OnClick = SpeedButton1Click
|
|
|
|
|
end
|
|
|
|
|
object Memo1: TMemo
|
2014-06-02 02:27:46 +00:00
|
|
|
AnchorSideBottom.Control = Button3
|
2011-07-04 19:52:53 +00:00
|
|
|
Left = 0
|
2014-06-02 02:27:46 +00:00
|
|
|
Height = 188
|
2011-07-04 19:52:53 +00:00
|
|
|
Top = 0
|
2016-09-05 21:17:11 +02:00
|
|
|
Width = 640
|
2011-07-04 19:52:53 +00:00
|
|
|
Align = alTop
|
2014-06-02 02:27:46 +00:00
|
|
|
Anchors = [akTop, akLeft, akRight, akBottom]
|
2011-07-04 19:52:53 +00:00
|
|
|
Color = clBtnFace
|
|
|
|
|
ReadOnly = True
|
|
|
|
|
ScrollBars = ssVertical
|
|
|
|
|
TabOrder = 0
|
|
|
|
|
end
|
|
|
|
|
object Button2: TButton
|
2014-06-02 02:27:46 +00:00
|
|
|
AnchorSideLeft.Control = Memo1
|
|
|
|
|
AnchorSideLeft.Side = asrCenter
|
|
|
|
|
AnchorSideTop.Control = Button1
|
|
|
|
|
AnchorSideTop.Side = asrBottom
|
|
|
|
|
AnchorSideBottom.Control = Owner
|
|
|
|
|
AnchorSideBottom.Side = asrBottom
|
2016-09-05 21:17:11 +02:00
|
|
|
Left = 283
|
2011-07-04 19:52:53 +00:00
|
|
|
Height = 25
|
2016-09-05 21:17:11 +02:00
|
|
|
Top = 253
|
2011-07-04 19:52:53 +00:00
|
|
|
Width = 75
|
2014-06-02 02:27:46 +00:00
|
|
|
Anchors = [akLeft, akBottom]
|
2016-09-05 21:17:11 +02:00
|
|
|
AutoSize = True
|
2014-06-02 02:27:46 +00:00
|
|
|
BorderSpacing.Top = 3
|
2016-09-05 21:17:11 +02:00
|
|
|
BorderSpacing.Bottom = 2
|
2011-07-04 19:52:53 +00:00
|
|
|
Caption = 'Next'
|
2016-09-05 21:17:11 +02:00
|
|
|
Constraints.MinWidth = 75
|
2011-07-04 19:52:53 +00:00
|
|
|
Enabled = False
|
|
|
|
|
OnClick = Button2Click
|
|
|
|
|
TabOrder = 1
|
|
|
|
|
end
|
|
|
|
|
object Button1: TButton
|
2014-06-02 02:27:46 +00:00
|
|
|
AnchorSideLeft.Control = Button3
|
|
|
|
|
AnchorSideTop.Control = Button3
|
|
|
|
|
AnchorSideTop.Side = asrBottom
|
|
|
|
|
AnchorSideRight.Control = Button3
|
|
|
|
|
AnchorSideRight.Side = asrBottom
|
|
|
|
|
AnchorSideBottom.Control = Button2
|
2016-09-05 21:17:11 +02:00
|
|
|
Left = 288
|
|
|
|
|
Height = 25
|
|
|
|
|
Top = 223
|
2014-06-02 02:27:46 +00:00
|
|
|
Width = 64
|
|
|
|
|
Anchors = [akLeft, akRight, akBottom]
|
2016-09-05 21:17:11 +02:00
|
|
|
AutoSize = True
|
2014-06-02 02:27:46 +00:00
|
|
|
BorderSpacing.Top = 3
|
|
|
|
|
BorderSpacing.Bottom = 5
|
2011-07-04 19:52:53 +00:00
|
|
|
Caption = 'Fire'
|
2016-09-05 21:17:11 +02:00
|
|
|
Constraints.MinWidth = 64
|
2011-07-04 19:52:53 +00:00
|
|
|
OnClick = Button1Click
|
|
|
|
|
TabOrder = 2
|
|
|
|
|
end
|
|
|
|
|
object Button3: TButton
|
2014-06-02 02:27:46 +00:00
|
|
|
AnchorSideLeft.Control = Memo1
|
|
|
|
|
AnchorSideLeft.Side = asrCenter
|
|
|
|
|
AnchorSideTop.Control = Memo1
|
|
|
|
|
AnchorSideTop.Side = asrBottom
|
|
|
|
|
AnchorSideBottom.Control = Button1
|
2016-09-05 21:17:11 +02:00
|
|
|
Left = 288
|
|
|
|
|
Height = 25
|
2014-06-02 02:27:46 +00:00
|
|
|
Top = 194
|
|
|
|
|
Width = 64
|
|
|
|
|
Anchors = [akLeft, akBottom]
|
|
|
|
|
AutoSize = True
|
|
|
|
|
BorderSpacing.Top = 6
|
|
|
|
|
BorderSpacing.Bottom = 4
|
2011-07-04 19:52:53 +00:00
|
|
|
Caption = 'Hit me'
|
2016-09-05 21:17:11 +02:00
|
|
|
Constraints.MinWidth = 64
|
2011-07-04 19:52:53 +00:00
|
|
|
OnClick = Button3Click
|
|
|
|
|
TabOrder = 3
|
|
|
|
|
end
|
|
|
|
|
object Timer1: TTimer
|
|
|
|
|
Interval = 250
|
|
|
|
|
OnTimer = Timer1Timer
|
2021-03-26 00:10:44 +01:00
|
|
|
Left = 432
|
|
|
|
|
Top = 200
|
2011-07-04 19:52:53 +00:00
|
|
|
end
|
|
|
|
|
end
|