📄 unit1.dfm
字号:
object Form1: TForm1
Left = 248
Top = 139
Width = 607
Height = 706
Caption = #1054#1057' ... [1 '#1090#1086#1095#1082#1072']'
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
PixelsPerInch = 96
TextHeight = 13
object Button3: TButton
Left = 272
Top = 8
Width = 113
Height = 41
Caption = #1042#1067#1061#1054#1044
Font.Charset = RUSSIAN_CHARSET
Font.Color = clTeal
Font.Height = -19
Font.Name = 'Times New Roman'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
OnClick = Button3Click
end
object Button1: TButton
Left = 400
Top = 8
Width = 97
Height = 41
Caption = #1057#1074#1077#1076#1077#1085#1080#1103
TabOrder = 1
OnClick = Button1Click
end
object TabbedNotebook1: TTabbedNotebook
Left = 32
Top = 48
Width = 513
Height = 545
PageIndex = 2
TabFont.Charset = DEFAULT_CHARSET
TabFont.Color = clBtnText
TabFont.Height = -11
TabFont.Name = 'MS Sans Serif'
TabFont.Style = []
TabOrder = 2
object TTabPage
Left = 4
Top = 24
Caption = #8470'1'
object GroupBox1: TGroupBox
Left = 24
Top = 16
Width = 337
Height = 121
Caption = #1057#1080#1089#1090#1077#1084#1085#1086#1077' '#1074#1088#1077#1084#1103
Font.Charset = RUSSIAN_CHARSET
Font.Color = clGreen
Font.Height = -13
Font.Name = 'Times New Roman'
Font.Style = []
ParentFont = False
TabOrder = 0
object Label1: TLabel
Left = 128
Top = 64
Width = 19
Height = 15
Caption = #1095#1072#1089
end
object Label2: TLabel
Left = 176
Top = 64
Width = 23
Height = 15
Caption = #1084#1080#1085
end
object Label4: TLabel
Left = 160
Top = 16
Width = 86
Height = 15
Caption = #1058#1077#1082#1091#1097#1077#1077' '#1074#1088#1077#1084#1103
end
object Edit2: TEdit
Left = 128
Top = 80
Width = 41
Height = 27
Font.Charset = RUSSIAN_CHARSET
Font.Color = clNavy
Font.Height = -16
Font.Name = 'Times New Roman'
Font.Style = []
ParentFont = False
TabOrder = 0
end
object Button2: TButton
Left = 16
Top = 80
Width = 89
Height = 25
Caption = #1059#1089#1090#1072#1085#1086#1074#1080#1090#1100
TabOrder = 3
OnClick = Button2Click
end
object Edit3: TEdit
Left = 176
Top = 80
Width = 41
Height = 27
Font.Charset = RUSSIAN_CHARSET
Font.Color = clNavy
Font.Height = -16
Font.Name = 'Times New Roman'
Font.Style = []
ParentFont = False
TabOrder = 1
end
object Panel1: TPanel
Left = 136
Top = 32
Width = 137
Height = 33
Caption = 'Panel1'
TabOrder = 4
object Label3: TLabel
Left = 32
Top = 6
Width = 56
Height = 22
Caption = 'Label3'
Font.Charset = RUSSIAN_CHARSET
Font.Color = clRed
Font.Height = -19
Font.Name = 'Times New Roman'
Font.Style = [fsBold]
ParentFont = False
end
end
object LabeledEdit8: TLabeledEdit
Left = 224
Top = 80
Width = 41
Height = 27
EditLabel.Width = 18
EditLabel.Height = 15
EditLabel.Caption = #1089#1077#1082
Font.Charset = RUSSIAN_CHARSET
Font.Color = clNavy
Font.Height = -16
Font.Name = 'Times New Roman'
Font.Style = []
LabelPosition = lpAbove
LabelSpacing = 3
ParentFont = False
TabOrder = 2
end
object LabeledEdit9: TLabeledEdit
Left = 272
Top = 80
Width = 49
Height = 27
EditLabel.Width = 27
EditLabel.Height = 15
EditLabel.Caption = #1084#1089#1077#1082
Font.Charset = RUSSIAN_CHARSET
Font.Color = clNavy
Font.Height = -16
Font.Name = 'Times New Roman'
Font.Style = []
LabelPosition = lpAbove
LabelSpacing = 3
ParentFont = False
TabOrder = 5
Text = '000'
end
end
object GroupBox2: TGroupBox
Left = 24
Top = 156
Width = 417
Height = 289
Caption = #1074#1088#1077#1084#1103' '#1089#1086#1079#1076#1072#1085#1080#1103' '#1092#1072#1081#1083#1072
Font.Charset = RUSSIAN_CHARSET
Font.Color = clGreen
Font.Height = -13
Font.Name = 'Times New Roman'
Font.Style = []
ParentFont = False
TabOrder = 1
object Button4: TButton
Left = 8
Top = 24
Width = 113
Height = 25
Caption = #1054#1090#1082#1088#1099#1090#1100' '#1092#1072#1081#1083
TabOrder = 0
OnClick = Button4Click
end
object LabeledEdit1: TLabeledEdit
Left = 8
Top = 72
Width = 393
Height = 23
EditLabel.Width = 82
EditLabel.Height = 15
EditLabel.Caption = #1058#1077#1082#1091#1097#1080#1081' '#1092#1072#1081#1083
LabelPosition = lpAbove
LabelSpacing = 3
TabOrder = 1
end
object LabeledEdit2: TLabeledEdit
Left = 8
Top = 120
Width = 393
Height = 23
EditLabel.Width = 116
EditLabel.Height = 15
EditLabel.Caption = #1044#1072#1090#1072' '#1089#1086#1079#1076#1072#1085#1080#1103' '#1092#1072#1081#1083#1072
LabelPosition = lpAbove
LabelSpacing = 3
TabOrder = 2
end
object GroupBox3: TGroupBox
Left = 8
Top = 160
Width = 393
Height = 113
Caption = #1048#1079#1084#1077#1085#1080#1090#1100' '#1076#1072#1090#1091' '#1089#1086#1079#1076#1072#1085#1080#1103' '#1092#1072#1081#1083#1072
TabOrder = 3
object LabeledEdit3: TLabeledEdit
Left = 8
Top = 80
Width = 33
Height = 23
EditLabel.Width = 25
EditLabel.Height = 15
EditLabel.Caption = #1076#1077#1085#1100
LabelPosition = lpAbove
LabelSpacing = 3
TabOrder = 0
Text = '01'
end
object LabeledEdit4: TLabeledEdit
Left = 56
Top = 80
Width = 33
Height = 23
EditLabel.Width = 34
EditLabel.Height = 15
EditLabel.Caption = #1084#1077#1089#1103#1094
LabelPosition = lpAbove
LabelSpacing = 3
TabOrder = 1
Text = '01'
end
object LabeledEdit5: TLabeledEdit
Left = 104
Top = 80
Width = 49
Height = 23
EditLabel.Width = 18
EditLabel.Height = 15
EditLabel.Caption = #1075#1086#1076
LabelPosition = lpAbove
LabelSpacing = 3
TabOrder = 2
Text = '2000'
end
object LabeledEdit6: TLabeledEdit
Left = 200
Top = 80
Width = 33
Height = 23
EditLabel.Width = 19
EditLabel.Height = 15
EditLabel.Caption = #1095#1072#1089
LabelPosition = lpAbove
LabelSpacing = 3
TabOrder = 3
Text = '12'
end
object LabeledEdit7: TLabeledEdit
Left = 248
Top = 80
Width = 33
Height = 23
EditLabel.Width = 41
EditLabel.Height = 15
EditLabel.Caption = #1084#1080#1085#1091#1090#1072
LabelPosition = lpAbove
LabelSpacing = 3
TabOrder = 4
Text = '00'
end
object Button5: TButton
Left = 8
Top = 32
Width = 89
Height = 25
Caption = #1048#1079#1084#1077#1085#1080#1090#1100
TabOrder = 5
OnClick = Button5Click
end
end
end
end
object TTabPage
Left = 4
Top = 24
Caption = #8470'2'
object Label6: TLabel
Left = 88
Top = 120
Width = 32
Height = 13
Caption = 'Label6'
end
object Label7: TLabel
Left = 88
Top = 72
Width = 32
Height = 13
Caption = 'Label7'
end
object Label8: TLabel
Left = 24
Top = 72
Width = 39
Height = 13
Caption = #1056#1072#1079#1084#1077#1088
end
object Label9: TLabel
Left = 16
Top = 120
Width = 49
Height = 13
Caption = #1054#1089#1090#1072#1083#1086#1089#1100
end
object Label5: TLabel
Left = 24
Top = 96
Width = 36
Height = 13
Caption = #1047#1072#1085#1103#1090#1086
end
object Label10: TLabel
Left = 88
Top = 96
Width = 38
Height = 13
Caption = 'Label10'
end
object Label11: TLabel
Left = 40
Top = 192
Width = 38
Height = 13
Caption = 'Label11'
end
object Label12: TLabel
Left = 24
Top = 16
Width = 95
Height = 13
Caption = #1042#1099#1073#1086#1088' '#1085#1072#1082#1086#1087#1080#1090#1077#1083#1103
end
object DriveComboBox1: TDriveComboBox
Left = 16
Top = 32
Width = 145
Height = 19
TabOrder = 0
OnChange = DriveComboBox1Change
end
object Button6: TButton
Left = 24
Top = 160
Width = 75
Height = 25
Caption = 'Button6'
TabOrder = 1
OnClick = Button6Click
end
end
object TTabPage
Left = 4
Top = 24
Caption = #8470'3'
object StringGrid1: TStringGrid
Left = 16
Top = 64
Width = 401
Height = 145
TabOrder = 0
end
object LabeledEdit10: TLabeledEdit
Left = 112
Top = 24
Width = 65
Height = 24
EditLabel.Width = 58
EditLabel.Height = 13
EditLabel.Caption = #1090#1080#1087' '#1092#1072#1081#1083#1086#1074
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
LabelPosition = lpAbove
LabelSpacing = 3
ParentFont = False
TabOrder = 1
end
object Button7: TButton
Left = 24
Top = 24
Width = 75
Height = 25
Caption = #1087#1086#1081#1089#1082
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
OnClick = Button7Click
end
object Memo1: TMemo
Left = 32
Top = 224
Width = 353
Height = 161
Lines.Strings = (
'Memo1')
TabOrder = 3
end
end
end
object Timer1: TTimer
Interval = 10
OnTimer = Timer1Timer
Left = 24
Top = 8
end
object OpenDialog1: TOpenDialog
Left = 56
Top = 8
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -