📄 cd4_2u.dfm
字号:
object Form1: TForm1
Left = 221
Top = 114
Width = 574
Height = 376
Caption = #38142#34920#30340#22522#26412#27169#22411
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = #23435#20307
Font.Style = []
OldCreateOrder = False
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 11
object sg: TStringGrid
Left = 16
Top = 16
Width = 186
Height = 313
ColCount = 2
DefaultColWidth = 80
RowCount = 109
TabOrder = 0
RowHeights = (
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24
24)
end
object Panel1: TPanel
Left = 221
Top = 16
Width = 329
Height = 121
TabOrder = 1
object p4: TLabel
Left = 294
Top = 47
Width = 32
Height = 33
AutoSize = False
Caption = '"'
Color = clMenu
Font.Charset = SYMBOL_CHARSET
Font.Color = clWindowText
Font.Height = -32
Font.Name = 'Wingdings 3'
Font.Style = []
ParentColor = False
ParentFont = False
Visible = False
end
object d1: TLabel
Left = 80
Top = 56
Width = 49
Height = 17
AutoSize = False
Color = clBackground
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentColor = False
ParentFont = False
Visible = False
end
object p1: TLabel
Left = 134
Top = 47
Width = 32
Height = 33
AutoSize = False
Caption = '"'
Color = clMenu
Font.Charset = SYMBOL_CHARSET
Font.Color = clWindowText
Font.Height = -32
Font.Name = 'Wingdings 3'
Font.Style = []
ParentColor = False
ParentFont = False
Visible = False
end
object l1: TLabel
Left = 128
Top = 56
Width = 9
Height = 17
AutoSize = False
Color = clOlive
ParentColor = False
Visible = False
end
object Label3: TLabel
Left = 32
Top = 16
Width = 25
Height = 17
AutoSize = False
Caption = 'First'
Color = clTeal
Font.Charset = DEFAULT_CHARSET
Font.Color = clSilver
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
end
object Shape1: TShape
Left = 24
Top = 8
Width = 41
Height = 33
Pen.Mode = pmMask
end
object d2: TLabel
Left = 160
Top = 56
Width = 49
Height = 17
AutoSize = False
Color = clBackground
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentColor = False
ParentFont = False
Visible = False
end
object p2: TLabel
Left = 214
Top = 47
Width = 32
Height = 33
AutoSize = False
Caption = '"'
Color = clMenu
Font.Charset = SYMBOL_CHARSET
Font.Color = clWindowText
Font.Height = -32
Font.Name = 'Wingdings 3'
Font.Style = []
ParentColor = False
ParentFont = False
Visible = False
end
object l2: TLabel
Left = 208
Top = 56
Width = 9
Height = 17
AutoSize = False
Color = clOlive
ParentColor = False
Visible = False
end
object d3: TLabel
Left = 240
Top = 56
Width = 49
Height = 17
AutoSize = False
Color = clBackground
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentColor = False
ParentFont = False
Visible = False
end
object p3: TLabel
Left = 294
Top = 47
Width = 32
Height = 33
AutoSize = False
Caption = '4'
Color = clMenu
Font.Charset = SYMBOL_CHARSET
Font.Color = clWindowText
Font.Height = -32
Font.Name = 'Wingdings 3'
Font.Style = []
ParentColor = False
ParentFont = False
Transparent = True
Visible = False
end
object l3: TLabel
Left = 288
Top = 56
Width = 9
Height = 17
AutoSize = False
Color = clOlive
ParentColor = False
Visible = False
end
object Label2: TLabel
Left = 64
Top = 96
Width = 201
Height = 21
AutoSize = False
Caption = #38142#34920#22522#26412#27169#22411#21160#24577#22270#35299
Color = clMenu
Font.Charset = DEFAULT_CHARSET
Font.Color = clMaroon
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
ParentColor = False
ParentFont = False
end
object Shape2: TShape
Left = 24
Top = 48
Width = 41
Height = 33
Pen.Mode = pmMask
end
object Label4: TLabel
Left = 32
Top = 56
Width = 25
Height = 17
AutoSize = False
Caption = 'First'
Color = clTeal
Font.Charset = DEFAULT_CHARSET
Font.Color = clSilver
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentColor = False
ParentFont = False
end
object p00: TLabel
Left = 54
Top = 7
Width = 27
Height = 40
AutoSize = False
Caption = '"'
Color = clMenu
Font.Charset = SYMBOL_CHARSET
Font.Color = clWindowText
Font.Height = -32
Font.Name = 'Wingdings 3'
Font.Style = []
ParentColor = False
ParentFont = False
Transparent = True
Visible = False
end
object p01: TLabel
Left = 134
Top = 7
Width = 32
Height = 33
AutoSize = False
Caption = '"'
Color = clMenu
Font.Charset = SYMBOL_CHARSET
Font.Color = clWindowText
Font.Height = -32
Font.Name = 'Wingdings 3'
Font.Style = []
ParentColor = False
ParentFont = False
Visible = False
end
object p02: TLabel
Left = 214
Top = 7
Width = 32
Height = 33
AutoSize = False
Caption = '"'
Color = clMenu
Font.Charset = SYMBOL_CHARSET
Font.Color = clWindowText
Font.Height = -32
Font.Name = 'Wingdings 3'
Font.Style = []
ParentColor = False
ParentFont = False
Visible = False
end
object d01: TLabel
Left = 80
Top = 16
Width = 49
Height = 17
AutoSize = False
Color = clBackground
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentColor = False
ParentFont = False
Visible = False
end
object l01: TLabel
Left = 128
Top = 16
Width = 9
Height = 17
AutoSize = False
Color = clOlive
ParentColor = False
Visible = False
end
object l02: TLabel
Left = 208
Top = 16
Width = 9
Height = 17
AutoSize = False
Color = clOlive
ParentColor = False
Visible = False
end
object l03: TLabel
Left = 288
Top = 16
Width = 9
Height = 17
AutoSize = False
Color = clOlive
ParentColor = False
Visible = False
end
object p03: TLabel
Left = 54
Top = 7
Width = 32
Height = 34
AutoSize = False
Caption = '4'
Color = clMenu
Font.Charset = SYMBOL_CHARSET
Font.Color = clWindowText
Font.Height = -32
Font.Name = 'Wingdings 3'
Font.Style = []
ParentColor = False
ParentFont = False
Transparent = True
Visible = False
end
object d02: TLabel
Left = 160
Top = 16
Width = 49
Height = 17
AutoSize = False
Color = clBackground
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentColor = False
ParentFont = False
Visible = False
end
object d03: TLabel
Left = 240
Top = 16
Width = 49
Height = 17
AutoSize = False
Color = clBackground
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentColor = False
ParentFont = False
Visible = False
end
object p: TLabel
Left = 54
Top = 47
Width = 32
Height = 33
AutoSize = False
Caption = '"'
Color = clMenu
Font.Charset = SYMBOL_CHARSET
Font.Color = clWindowText
Font.Height = -32
Font.Name = 'Wingdings 3'
Font.Style = []
ParentColor = False
ParentFont = False
Transparent = True
Visible = False
end
object p04: TLabel
Left = 294
Top = 7
Width = 32
Height = 33
AutoSize = False
Caption = '4'
Color = clMenu
Font.Charset = SYMBOL_CHARSET
Font.Color = clWindowText
Font.Height = -32
Font.Name = 'Wingdings 3'
Font.Style = []
ParentColor = False
ParentFont = False
Transparent = True
Visible = False
end
end
object GroupBox1: TGroupBox
Left = 221
Top = 152
Width = 329
Height = 121
Caption = #25805#20316#38754#26495
TabOrder = 2
object lout: TLabel
Left = 16
Top = 80
Width = 121
Height = 25
AutoSize = False
Caption = #28040#24687#20449#24687
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -19
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
end
object Label1: TLabel
Left = 16
Top = 24
Width = 209
Height = 13
AutoSize = False
Caption = #36755#20837#21517#31216#21518#25353#21491#26041#25353#38062#25191#34892#25805#20316
Color = clMenu
Font.Charset = DEFAULT_CHARSET
Font.Color = clGray
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentColor = False
ParentFont = False
end
object ein: TEdit
Left = 16
Top = 40
Width = 121
Height = 19
ImeName = #12356#12421' ('#32649#30768') - '#31325#29460#57646
TabOrder = 0
end
object ab: TButton
Left = 240
Top = 40
Width = 75
Height = 25
Caption = ' '#22842#21518
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
OnClick = abClick
end
object dpl: TButton
Left = 240
Top = 80
Width = 75
Height = 25
Caption = ' '#21015#24109
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 2
OnClick = dplClick
end
object cle: TButton
Left = 152
Top = 80
Width = 75
Height = 25
Caption = ' '#28165#22330
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 3
OnClick = cleClick
end
object af: TButton
Left = 144
Top = 40
Width = 75
Height = 25
Caption = ' '#20105#20808
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 4
OnClick = afClick
end
end
object end: TButton
Left = 509
Top = 288
Width = 41
Height = 41
Caption = #32467#26463
TabOrder = 3
OnClick = endClick
end
object lbout: TListBox
Left = 221
Top = 288
Width = 273
Height = 41
ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899
ItemHeight = 11
Items.Strings = (
#21160#20316#21015#34920)
TabOrder = 4
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -