76 lines
1.9 KiB
Plaintext
76 lines
1.9 KiB
Plaintext
object Form1: TForm1
|
|
Left = 352
|
|
Height = 673
|
|
Top = 32
|
|
Width = 600
|
|
Caption = 'Form1'
|
|
ClientHeight = 673
|
|
ClientWidth = 600
|
|
DesignTimePPI = 120
|
|
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 = asrBottom
|
|
AnchorSideBottom.Control = Owner
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 472
|
|
Height = 48
|
|
Top = 615
|
|
Width = 118
|
|
Anchors = [akRight, akBottom]
|
|
BorderSpacing.Right = 10
|
|
BorderSpacing.Bottom = 10
|
|
Caption = 'Пуск'
|
|
TabOrder = 0
|
|
OnClick = StartStopBtnClick
|
|
end
|
|
object ResizeField: TFloatSpinEdit
|
|
AnchorSideLeft.Control = Owner
|
|
AnchorSideBottom.Control = Owner
|
|
AnchorSideBottom.Side = asrBottom
|
|
Left = 10
|
|
Height = 28
|
|
Top = 635
|
|
Width = 63
|
|
Anchors = [akLeft, akBottom]
|
|
BorderSpacing.Left = 10
|
|
BorderSpacing.Bottom = 10
|
|
TabOrder = 1
|
|
Value = 1
|
|
end
|
|
object Label1: TLabel
|
|
Left = 10
|
|
Height = 20
|
|
Top = 615
|
|
Width = 125
|
|
Caption = 'Изменить размер'
|
|
end
|
|
end
|