📄 unit18.~dfm
字号:
Caption = '差旅费给'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label24: TLabel
Left = 22
Top = 395
Width = 60
Height = 15
Alignment = taRightJustify
AutoSize = False
Caption = '材料费给'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label25: TLabel
Left = 256
Top = 392
Width = 73
Height = 17
AutoSize = False
Caption = '是否结算'
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = '宋体'
Font.Style = []
ParentFont = False
Transparent = True
end
object Button1: TButton
Left = 240
Top = 456
Width = 65
Height = 25
Caption = '添 加'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 0
OnClick = Button1Click
end
object Button2: TButton
Left = 400
Top = 456
Width = 65
Height = 25
Caption = '返 回'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 1
OnClick = Button2Click
end
object DBEdit1: TMaskEdit
Left = 328
Top = 152
Width = 137
Height = 21
EditMask = '!99/99/00;1;_'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
MaxLength = 8
ParentFont = False
TabOrder = 2
Text = ' - - '
OnKeyPress = DBEdit1KeyPress
end
object DBEdit2: TMaskEdit
Left = 328
Top = 184
Width = 137
Height = 21
EditMask = '!99/99/00;1;_'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
MaxLength = 8
ParentFont = False
TabOrder = 3
Text = ' - - '
OnKeyPress = DBEdit2KeyPress
end
object Edit1: TEdit
Left = 96
Top = 216
Width = 137
Height = 21
TabOrder = 4
OnKeyPress = Edit1KeyPress
end
object Edit3: TEdit
Left = 328
Top = 88
Width = 137
Height = 21
TabOrder = 5
OnKeyPress = Edit3KeyPress
end
object Edit4: TEdit
Left = 96
Top = 184
Width = 137
Height = 21
TabOrder = 6
OnKeyPress = Edit4KeyPress
end
object Edit5: TEdit
Left = 328
Top = 216
Width = 137
Height = 21
TabOrder = 7
OnKeyPress = Edit5KeyPress
end
object Edit6: TEdit
Left = 96
Top = 248
Width = 137
Height = 21
TabOrder = 8
OnKeyPress = Edit6KeyPress
end
object Edit7: TEdit
Left = 328
Top = 248
Width = 137
Height = 21
TabOrder = 9
OnKeyPress = Edit7KeyPress
end
object Edit8: TEdit
Left = 96
Top = 280
Width = 137
Height = 21
TabOrder = 10
OnKeyPress = Edit8KeyPress
end
object Edit9: TEdit
Left = 96
Top = 416
Width = 369
Height = 21
TabOrder = 11
OnKeyPress = Edit9KeyPress
end
object Edit2: TEdit
Left = 96
Top = 88
Width = 137
Height = 21
TabOrder = 12
OnKeyPress = Edit2KeyPress
end
object EditDBEdit7: TDBEdit
Left = 96
Top = 122
Width = 139
Height = 21
DataField = '内机编号1'
DataSource = frm_setup.DataSource1
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
ParentFont = False
TabOrder = 13
OnKeyPress = EditDBEdit7KeyPress
end
object EditDBEdit8: TDBEdit
Left = 326
Top = 122
Width = 139
Height = 21
DataField = '内机编号2'
DataSource = frm_setup.DataSource1
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
ParentFont = False
TabOrder = 14
OnKeyPress = EditDBEdit8KeyPress
end
object EditDBEdit9: TDBEdit
Left = 96
Top = 154
Width = 139
Height = 21
DataField = '外机编号'
DataSource = frm_setup.DataSource1
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
ParentFont = False
TabOrder = 15
OnKeyPress = EditDBEdit9KeyPress
end
object Edit10: TEdit
Left = 96
Top = 24
Width = 137
Height = 21
Color = clInfoBk
Font.Charset = DEFAULT_CHARSET
Font.Color = clMaroon
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
ReadOnly = True
TabOrder = 16
Text = 'Edit10'
end
object ComboBox1: TComboBox
Left = 328
Top = 24
Width = 137
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 17
OnChange = ComboBox1Change
OnKeyPress = ComboBox1KeyPress
end
object ComboBox2: TComboBox
Left = 96
Top = 56
Width = 137
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 18
OnKeyPress = ComboBox2KeyPress
end
object DBLookupComboBox5: TDBLookupComboBox
Left = 96
Top = 315
Width = 137
Height = 21
DataField = '辅安装人2'
DataSource = frm_setup.DataSource1
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
KeyField = '姓名'
ListField = '姓名'
ListSource = frm_setup.DataSource2
ParentFont = False
TabOrder = 19
OnKeyPress = DBLookupComboBox5KeyPress
end
object DBLookupComboBox6: TDBLookupComboBox
Left = 328
Top = 283
Width = 137
Height = 21
DataField = '辅安装人1'
DataSource = frm_setup.DataSource1
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
KeyField = '姓名'
ListField = '姓名'
ListSource = frm_setup.DataSource2
ParentFont = False
TabOrder = 20
OnKeyPress = DBLookupComboBox6KeyPress
end
object DBLookupComboBox4: TDBLookupComboBox
Left = 328
Top = 317
Width = 137
Height = 24
DataField = '辅安装人3'
DataSource = frm_setup.DataSource1
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
KeyField = '姓名'
ListField = '姓名'
ListSource = frm_setup.DataSource2
ParentFont = False
ParentShowHint = False
ShowHint = False
TabOrder = 21
TabStop = False
OnKeyPress = DBLookupComboBox4KeyPress
end
object DBLookupComboBox8: TDBLookupComboBox
Left = 328
Top = 355
Width = 137
Height = 21
DataField = '差旅费给'
DataSource = frm_setup.DataSource1
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
KeyField = '姓名'
ListField = '姓名'
ListSource = frm_setup.DataSource2
ParentFont = False
TabOrder = 22
OnKeyPress = DBLookupComboBox8KeyPress
end
object DBLookupComboBox9: TDBLookupComboBox
Left = 96
Top = 387
Width = 137
Height = 21
DataField = '材料费给'
DataSource = frm_setup.DataSource1
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
KeyField = '姓名'
ListField = '姓名'
ListSource = frm_setup.DataSource2
ParentFont = False
TabOrder = 23
OnKeyPress = DBLookupComboBox9KeyPress
end
object DBLookupComboBox7: TDBLookupComboBox
Left = 96
Top = 352
Width = 137
Height = 21
DataField = '交通费给'
DataSource = frm_setup.DataSource1
Font.Charset = ANSI_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
KeyField = '姓名'
ListField = '姓名'
ListSource = frm_setup.DataSource2
ParentFont = False
TabOrder = 24
OnKeyPress = DBLookupComboBox7KeyPress
end
object DBComboBox1: TDBComboBox
Left = 328
Top = 384
Width = 137
Height = 21
ItemHeight = 13
Items.Strings = (
'是'
'否')
TabOrder = 25
end
object ComboBox3: TComboBox
Left = 328
Top = 384
Width = 137
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 26
OnKeyPress = ComboBox3KeyPress
Items.Strings = (
'是'
'否')
end
object ComboBox4: TComboBox
Left = 328
Top = 56
Width = 137
Height = 21
Style = csDropDownList
ItemHeight = 13
TabOrder = 27
OnKeyPress = ComboBox4KeyPress
end
object Button3: TButton
Left = 320
Top = 456
Width = 65
Height = 25
Caption = '继 续'
TabOrder = 28
OnClick = Button3Click
OnKeyPress = Button3KeyPress
end
object Query1: TQuery
Left = 16
Top = 456
end
object DataSource1: TDataSource
DataSet = Query1
Left = 56
Top = 456
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -