📄 new.~dfm
字号:
object Form_New: TForm_New
Left = 348
Top = 118
Width = 1032
Height = 746
Caption = #26032#24314#30149#20154#26723#26696
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
WindowState = wsMaximized
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 13
object Label1: TLabel
Left = 368
Top = 8
Width = 209
Height = 41
AutoSize = False
Caption = ' '#26032' '#24314' '#26723' '#26696' '
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -32
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object GroupBox1: TGroupBox
Left = 16
Top = 600
Width = 993
Height = 57
TabOrder = 0
object Button_Save: TButton
Left = 128
Top = 16
Width = 121
Height = 33
Caption = #20445#23384
TabOrder = 0
OnClick = Button_SaveClick
end
object Button_Sample: TButton
Left = 360
Top = 16
Width = 153
Height = 33
Caption = #37319#26679
TabOrder = 1
OnClick = Button_SampleClick
end
object Button_Cancel: TButton
Left = 624
Top = 16
Width = 145
Height = 33
Caption = #36864#20986
TabOrder = 2
OnClick = Button_CancelClick
end
end
object GroupBox2: TGroupBox
Left = 16
Top = 48
Width = 993
Height = 529
TabOrder = 1
object Label2: TLabel
Left = 96
Top = 64
Width = 66
Height = 16
Caption = #32534' '#21495#65306' '
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label3: TLabel
Left = 96
Top = 128
Width = 69
Height = 16
Caption = #22995' '#21517#65306' '
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label4: TLabel
Left = 96
Top = 208
Width = 61
Height = 16
Caption = #24038'/'#21491#21033#65306' '
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label5: TLabel
Left = 96
Top = 280
Width = 60
Height = 16
Caption = #38376#35786#21495#65306' '
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label6: TLabel
Left = 96
Top = 352
Width = 72
Height = 16
Caption = #26816#26597#21069#26381#33647#65306
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label7: TLabel
Left = 96
Top = 408
Width = 72
Height = 16
Caption = #26816#26597#26102#31070#24535#65306
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label8: TLabel
Left = 336
Top = 64
Width = 51
Height = 16
Caption = #26085' '#26399#65306
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label9: TLabel
Left = 336
Top = 136
Width = 51
Height = 16
Caption = #24615' '#21035#65306
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label10: TLabel
Left = 336
Top = 208
Width = 60
Height = 16
Caption = #23548#32852#25968#65306' '
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label11: TLabel
Left = 592
Top = 64
Width = 78
Height = 16
Caption = #36215#22987#26102#38388#65306' '
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label12: TLabel
Left = 336
Top = 280
Width = 60
Height = 16
Caption = #20303#38498#21495#65306' '
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label13: TLabel
Left = 600
Top = 280
Width = 60
Height = 16
Caption = #30149#25151#21495#65306' '
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label14: TLabel
Left = 600
Top = 208
Width = 63
Height = 16
Caption = #31185' '#23460#65306' '
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label15: TLabel
Left = 360
Top = 408
Width = 42
Height = 16
Caption = #21307' '#24072#65306
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Label17: TLabel
Left = 600
Top = 136
Width = 66
Height = 16
Caption = #24180' '#40836#65306' '
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object Edit_bh: TEdit
Left = 168
Top = 64
Width = 105
Height = 21
ImeName = #20013#25991'('#31616#20307') - '#26234#33021#20108#31508#36755#20837#27861
TabOrder = 0
end
object Edit_xm: TEdit
Left = 168
Top = 128
Width = 105
Height = 21
ImeName = #20013#25991'('#31616#20307') - '#26234#33021#20108#31508#36755#20837#27861
TabOrder = 1
end
object ComboBox_zy: TComboBox
Left = 168
Top = 208
Width = 105
Height = 21
ImeName = #20013#25991'('#31616#20307') - '#26234#33021#20108#31508#36755#20837#27861
ItemHeight = 13
TabOrder = 2
Text = #24038
Items.Strings = (
#24038
#21491)
end
object ComboBox__mzh: TComboBox
Left = 168
Top = 280
Width = 105
Height = 21
ImeName = #20013#25991'('#31616#20307') - '#26234#33021#20108#31508#36755#20837#27861
ItemHeight = 13
TabOrder = 3
Text = '001'
Items.Strings = (
'001'
'002'
'003'
'004'
'005'
'006')
end
object ComboBox_jcqfy: TComboBox
Left = 200
Top = 352
Width = 465
Height = 21
ImeName = #20013#25991'('#31616#20307') - '#26234#33021#20108#31508#36755#20837#27861
ItemHeight = 13
TabOrder = 4
Text = #26080
Items.Strings = (
#26080
#26377)
end
object ComboBox_jcssz: TComboBox
Left = 200
Top = 408
Width = 97
Height = 21
ImeName = #20013#25991'('#31616#20307') - '#26234#33021#20108#31508#36755#20837#27861
ItemHeight = 13
TabOrder = 5
Text = #28165#37266
Items.Strings = (
#28165#37266
#26127#36855)
end
object DateTimePicker1_rq: TDateTimePicker
Left = 408
Top = 64
Width = 113
Height = 25
CalAlignment = dtaLeft
Date = 38885.3273296412
Time = 38885.3273296412
DateFormat = dfShort
DateMode = dmComboBox
ImeName = #20013#25991'('#31616#20307') - '#26234#33021#20108#31508#36755#20837#27861
Kind = dtkDate
ParseInput = False
TabOrder = 6
end
object RadioGroup1: TRadioGroup
Left = 416
Top = 112
Width = 113
Height = 41
TabOrder = 7
end
object RadioButton_man: TRadioButton
Left = 424
Top = 112
Width = 41
Height = 25
Caption = #30007
Checked = True
TabOrder = 8
TabStop = True
end
object RadioButton_woman: TRadioButton
Left = 496
Top = 112
Width = 41
Height = 25
Caption = #22899
TabOrder = 9
end
object ComboBox_dls: TComboBox
Left = 416
Top = 208
Width = 113
Height = 21
ImeName = #20013#25991'('#31616#20307') - '#26234#33021#20108#31508#36755#20837#27861
ItemHeight = 13
TabOrder = 10
Text = '16'
Items.Strings = (
'4'
'8'
'12'
'16')
end
object ComboBox_zyh: TComboBox
Left = 416
Top = 280
Width = 113
Height = 21
ImeName = #20013#25991'('#31616#20307') - '#26234#33021#20108#31508#36755#20837#27861
ItemHeight = 13
TabOrder = 11
Text = '001'
Items.Strings = (
'001'
'002'
'003'
'004'
'005'
'006')
end
object Edit_qssj: TEdit
Left = 680
Top = 64
Width = 105
Height = 21
ImeName = #20013#25991'('#31616#20307') - '#26234#33021#20108#31508#36755#20837#27861
TabOrder = 12
end
object Edit_nl: TEdit
Left = 680
Top = 136
Width = 105
Height = 21
ImeName = #20013#25991'('#31616#20307') - '#26234#33021#20108#31508#36755#20837#27861
TabOrder = 13
end
object ComboBox_ks: TComboBox
Left = 680
Top = 208
Width = 105
Height = 21
ImeName = #20013#25991'('#31616#20307') - '#26234#33021#20108#31508#36755#20837#27861
ItemHeight = 13
TabOrder = 14
Text = '001'
Items.Strings = (
'001'
'002'
'003'
'004'
'005'
'006')
end
object ComboBox_bfh: TComboBox
Left = 680
Top = 280
Width = 105
Height = 21
ImeName = #20013#25991'('#31616#20307') - '#26234#33021#20108#31508#36755#20837#27861
ItemHeight = 13
TabOrder = 15
Text = '001'
Items.Strings = (
'001'
'002'
'003'
'004'
'005'
'006')
end
object Edit_ys: TEdit
Left = 440
Top = 408
Width = 97
Height = 21
ImeName = #20013#25991'('#31616#20307') - '#26234#33021#20108#31508#36755#20837#27861
TabOrder = 16
end
end
object ADOConnection1: TADOConnection
ConnectionString =
'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Documents and Se' +
'ttings\jujumao\'#26700#38754'\C++\'#35797#39564'\Dangan.mdb;Mode=ReadWrite;Persist Secur' +
'ity Info=False'
LoginPrompt = False
Provider = 'Microsoft.Jet.OLEDB.4.0'
Left = 616
Top = 8
end
object ADOQuery1: TADOQuery
Connection = ADOConnection1
Parameters = <>
Left = 664
Top = 8
end
object ADOTable1: TADOTable
Connection = ADOConnection1
TableName = 'Pinfo'
Left = 744
Top = 16
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -