90 lines
1.9 KiB
Plaintext
90 lines
1.9 KiB
Plaintext
object Form1: TForm1
|
|
Left = 458
|
|
Height = 603
|
|
Top = 240
|
|
Width = 275
|
|
BorderIcons = [biSystemMenu, biMinimize]
|
|
BorderStyle = bsSingle
|
|
Caption = 'Тетрис'
|
|
ClientHeight = 603
|
|
ClientWidth = 275
|
|
Color = clBtnFace
|
|
DesignTimePPI = 120
|
|
Font.Color = clWindowText
|
|
Font.Height = -14
|
|
Font.Name = 'MS Sans Serif'
|
|
LCLVersion = '4.6.0.0'
|
|
OnCreate = FormCreate
|
|
OnDestroy = FormDestroy
|
|
OnKeyDown = FormKeyDown
|
|
OnKeyUp = FormKeyUp
|
|
object Screen: TImage
|
|
Left = 0
|
|
Height = 550
|
|
Top = 0
|
|
Width = 275
|
|
end
|
|
object BackBuffer: TImage
|
|
Left = 0
|
|
Height = 550
|
|
Top = 20
|
|
Width = 275
|
|
Visible = False
|
|
end
|
|
object Label1: TLabel
|
|
Left = 7
|
|
Height = 25
|
|
Top = 560
|
|
Width = 65
|
|
Caption = 'Линий:'
|
|
Font.Color = clWindowText
|
|
Font.Height = -20
|
|
Font.Name = 'MS Sans Serif'
|
|
ParentFont = False
|
|
end
|
|
object LinesLabel: TLabel
|
|
Left = 80
|
|
Height = 25
|
|
Top = 560
|
|
Width = 11
|
|
Caption = '0'
|
|
Font.Color = clWindowText
|
|
Font.Height = -20
|
|
Font.Name = 'MS Sans Serif'
|
|
ParentFont = False
|
|
end
|
|
object Label2: TLabel
|
|
Left = 127
|
|
Height = 25
|
|
Top = 560
|
|
Width = 53
|
|
Caption = 'Очки:'
|
|
Font.Color = clWindowText
|
|
Font.Height = -20
|
|
Font.Name = 'MS Sans Serif'
|
|
ParentFont = False
|
|
end
|
|
object ScoreLabel: TLabel
|
|
Left = 193
|
|
Height = 25
|
|
Top = 560
|
|
Width = 11
|
|
Caption = '0'
|
|
Font.Color = clWindowText
|
|
Font.Height = -20
|
|
Font.Name = 'MS Sans Serif'
|
|
ParentFont = False
|
|
end
|
|
object ImageList: TImageList
|
|
Height = 22
|
|
Width = 22
|
|
Left = 50
|
|
Top = 40
|
|
Bitmap = {
|
|
4C7A0500000016000000160000002F0000000000000078DAEDD8310100300C02
|
|
30A4571ACE36193C3962226D5F0180A9E401006B170060EC7200C098200080BD
|
|
0F140E46F1
|
|
}
|
|
end
|
|
end
|