55 lines
1.4 KiB
Plaintext
55 lines
1.4 KiB
Plaintext
object Form1: TForm1
|
|
Left = 352
|
|
Height = 673
|
|
Top = 32
|
|
Width = 600
|
|
Caption = 'Form1'
|
|
ClientHeight = 673
|
|
ClientWidth = 600
|
|
DesignTimePPI = 120
|
|
LCLVersion = '4.2.0.0'
|
|
object BackScreen: TImage
|
|
AnchorSideLeft.Control = Owner
|
|
AnchorSideTop.Control = Owner
|
|
AnchorSideRight.Control = Owner
|
|
AnchorSideRight.Side = asrBottom
|
|
AnchorSideBottom.Control = StartStopBtn
|
|
Left = 0
|
|
Height = 600
|
|
Top = 0
|
|
Width = 600
|
|
Anchors = [akTop, akLeft, akRight, akBottom]
|
|
BorderSpacing.Bottom = 15
|
|
end
|
|
object Screen: TPaintBox
|
|
AnchorSideLeft.Control = Owner
|
|
AnchorSideTop.Control = Owner
|
|
AnchorSideRight.Control = Owner
|
|
AnchorSideRight.Side = asrBottom
|
|
AnchorSideBottom.Control = StartStopBtn
|
|
Left = 0
|
|
Height = 600
|
|
Top = 0
|
|
Width = 600
|
|
Anchors = [akTop, akLeft, akRight, akBottom]
|
|
BorderSpacing.Bottom = 15
|
|
end
|
|
object StartStopBtn: TButton
|
|
AnchorSideLeft.Control = Owner
|
|
AnchorSideLeft.Side = asrCenter
|
|
AnchorSideRight.Control = Owner
|
|
AnchorSideRight.Side = asrCenter
|
|
AnchorSideBottom.Control = Owner
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 241
|
|
Height = 48
|
|
Top = 615
|
|
Width = 118
|
|
Anchors = [akLeft, akBottom]
|
|
BorderSpacing.Bottom = 10
|
|
Caption = 'Пуск'
|
|
TabOrder = 0
|
|
OnClick = StartStopBtnClick
|
|
end
|
|
end
|