📄 unit1.dfm
字号:
object Form1: TForm1
Left = 594
Top = 110
BorderStyle = bsDialog
Caption = #23383#24149#26102#38388#35843#25972#24037#20855
ClientHeight = 134
ClientWidth = 391
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
FormStyle = fsStayOnTop
OldCreateOrder = False
Position = poScreenCenter
OnClose = FormClose
PixelsPerInch = 96
TextHeight = 13
object Panel_pyw_dj: TPanel
Left = 8
Top = 5
Width = 64
Height = 23
BevelInner = bvRaised
BevelOuter = bvLowered
Caption = #23383#24149#25991#20214
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 0
end
object Edit_wjLJ: TComboBox
Left = 72
Top = 5
Width = 313
Height = 22
BevelInner = bvNone
BevelKind = bkFlat
DropDownCount = 20
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ImeName = 'a'
ItemHeight = 14
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 1
OnDropDown = Edit_wjLJCloseUp
end
object Panel51: TPanel
Left = 8
Top = 105
Width = 64
Height = 23
BevelInner = bvRaised
BevelOuter = bvLowered
Caption = #26102#38388#35843#25972
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 2
end
object Edit_tzFW: TMaskEdit
Left = 152
Top = 105
Width = 88
Height = 22
BevelInner = bvNone
BevelKind = bkFlat
BorderStyle = bsNone
EditMask = '!999:99.999;1;_'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ImeName = 'a'
MaxLength = 10
ParentFont = False
TabOrder = 3
Text = ' : . '
end
object Edit_tzLX: TComboBox
Left = 72
Top = 105
Width = 73
Height = 22
BevelInner = bvNone
BevelKind = bkFlat
DropDownCount = 20
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ImeName = 'a'
ItemHeight = 14
ItemIndex = 0
ParentFont = False
ParentShowHint = False
ShowHint = True
TabOrder = 4
Text = #36229#21069
Items.Strings = (
#36229#21069
#36840#21518)
end
object Button1: TButton
Left = 320
Top = 105
Width = 64
Height = 22
Cursor = crHandPoint
Caption = #26356#26032
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 5
OnClick = Button1Click
end
object Panel1: TPanel
Left = 8
Top = 30
Width = 64
Height = 23
BevelInner = bvRaised
BevelOuter = bvLowered
Caption = #21407#25991#23383#24149
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 6
end
object Edit_zmWZ: TEdit
Left = 72
Top = 30
Width = 313
Height = 21
TabStop = False
BevelInner = bvNone
BevelKind = bkFlat
BorderStyle = bsNone
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 7
OnKeyPress = onKeyPress_Null
end
object Panel2: TPanel
Left = 8
Top = 55
Width = 64
Height = 23
BevelInner = bvRaised
BevelOuter = bvLowered
Caption = #21407#25991#26102#38388
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 8
end
object Panel3: TPanel
Left = 8
Top = 80
Width = 64
Height = 23
BevelInner = bvRaised
BevelOuter = bvLowered
Caption = #26356#26032#26102#38388
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 9
end
object Edit_zmSJ: TMaskEdit
Left = 72
Top = 55
Width = 168
Height = 22
BevelInner = bvNone
BevelKind = bkFlat
BorderStyle = bsNone
EditMask = '!99:99:99,999;1;_'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ImeName = 'a'
MaxLength = 12
ParentFont = False
TabOrder = 10
Text = ' : : , '
OnKeyPress = onKeyPress_Null
end
object Edit_tzSJ: TMaskEdit
Left = 72
Top = 80
Width = 168
Height = 22
BevelInner = bvNone
BevelKind = bkFlat
BorderStyle = bsNone
EditMask = '!99:99:99,999;1;_'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ImeName = 'a'
MaxLength = 12
ParentFont = False
TabOrder = 11
Text = ' : : , '
OnKeyPress = Edit_tzSJKeyPress
OnKeyUp = Edit_tzSJKeyUp
end
object Button2: TButton
Left = 319
Top = 80
Width = 64
Height = 22
Cursor = crHandPoint
Caption = #37325#26032#36733#20837
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -14
Font.Name = #23435#20307
Font.Style = []
ParentFont = False
TabOrder = 12
OnClick = Button2Click
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -