📄 frmdsel00p.~dfm
字号:
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ImeName = #33521#25976
ParentFont = False
PopupMenu = FrmBaseForm.PopM1
ReadOnly = True
TabOrder = 2
end
object Edit8: TEdit [24]
Left = 100
Top = 189
Width = 50
Height = 28
Color = cl3DLight
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ImeName = #33521#25976
ParentFont = False
PopupMenu = FrmBaseForm.PopM1
ReadOnly = True
TabOrder = 7
end
object Edit9: TEdit [25]
Left = 212
Top = 189
Width = 53
Height = 28
Color = cl3DLight
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ImeName = #33521#25976
ParentFont = False
PopupMenu = FrmBaseForm.PopM1
ReadOnly = True
TabOrder = 8
Text = '1'
end
object Edit10: TEdit [26]
Left = 373
Top = 190
Width = 60
Height = 28
Color = cl3DLight
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ImeName = #33521#25976
ParentFont = False
PopupMenu = FrmBaseForm.PopM1
ReadOnly = True
TabOrder = 9
Text = '1'
end
object Edit6: TEdit [27]
Left = 373
Top = 148
Width = 60
Height = 28
Color = cl3DLight
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ImeName = #33521#25976
ParentFont = False
PopupMenu = FrmBaseForm.PopM1
ReadOnly = True
TabOrder = 5
OnExit = Edit6Exit
OnKeyPress = Edit6KeyPress
end
object Edit7: TEdit [28]
Left = 445
Top = 148
Width = 188
Height = 28
Color = cl3DLight
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ImeName = #33521#25976
ParentFont = False
PopupMenu = FrmBaseForm.PopM1
ReadOnly = True
TabOrder = 6
end
object Edit12: TEdit [29]
Left = 101
Top = 232
Width = 52
Height = 28
Color = cl3DLight
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ImeName = #33521#25976
ParentFont = False
PopupMenu = FrmBaseForm.PopM1
ReadOnly = True
TabOrder = 11
OnExit = Edit12Exit
end
object Edit13: TEdit [30]
Left = 157
Top = 232
Width = 108
Height = 28
Color = cl3DLight
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ImeName = #33521#25976
ParentFont = False
PopupMenu = FrmBaseForm.PopM1
ReadOnly = True
TabOrder = 12
end
object Edit14: TEdit [31]
Left = 373
Top = 232
Width = 60
Height = 28
Color = cl3DLight
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ImeName = #33521#25976
ParentFont = False
PopupMenu = FrmBaseForm.PopM1
ReadOnly = True
TabOrder = 13
end
object Edit4: TEdit [32]
Left = 101
Top = 148
Width = 52
Height = 28
Color = cl3DLight
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ImeName = #33521#25976
ParentFont = False
PopupMenu = FrmBaseForm.PopM1
ReadOnly = True
TabOrder = 3
OnExit = Edit4Exit
OnKeyPress = Edit4KeyPress
end
object Edit5: TEdit [33]
Left = 157
Top = 148
Width = 108
Height = 28
Color = cl3DLight
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ImeName = #33521#25976
ParentFont = False
PopupMenu = FrmBaseForm.PopM1
ReadOnly = True
TabOrder = 4
end
object Edit11: TEdit [34]
Left = 509
Top = 190
Width = 124
Height = 28
Color = cl3DLight
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ImeName = #33521#25976
ParentFont = False
PopupMenu = FrmBaseForm.PopM1
ReadOnly = True
TabOrder = 10
Text = '1'
end
object Edit15: TEdit [35]
Left = 509
Top = 232
Width = 124
Height = 28
Color = cl3DLight
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ImeName = #33521#25976
ParentFont = False
PopupMenu = FrmBaseForm.PopM1
ReadOnly = True
TabOrder = 14
Text = '1'
end
object Edit16: TEdit [36]
Left = 101
Top = 272
Width = 68
Height = 28
Color = cl3DLight
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ImeName = #33521#25976
ParentFont = False
PopupMenu = FrmBaseForm.PopM1
ReadOnly = True
TabOrder = 15
end
object Edit17: TEdit [37]
Left = 173
Top = 272
Width = 92
Height = 28
Color = cl3DLight
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ImeName = #33521#25976
ParentFont = False
PopupMenu = FrmBaseForm.PopM1
ReadOnly = True
TabOrder = 16
end
object Edit18: TEdit [38]
Left = 101
Top = 308
Width = 68
Height = 28
Color = cl3DLight
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ImeName = #33521#25976
ParentFont = False
PopupMenu = FrmBaseForm.PopM1
ReadOnly = True
TabOrder = 17
end
object Edit19: TEdit [39]
Left = 173
Top = 307
Width = 92
Height = 28
Color = cl3DLight
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ImeName = #33521#25976
ParentFont = False
PopupMenu = FrmBaseForm.PopM1
ReadOnly = True
TabOrder = 18
end
object DTP1: TDateTimePicker [40]
Left = 376
Top = 272
Width = 129
Height = 28
Date = 38461.485389363400000000
Time = 38461.485389363400000000
Color = cl3DLight
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 19
end
object DTP2: TDateTimePicker [41]
Left = 376
Top = 310
Width = 129
Height = 28
Date = 38461.485389363400000000
Time = 38461.485389363400000000
Color = cl3DLight
Enabled = False
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 20
end
object ADOQ_DsEl00: TADOQuery
Connection = DataM1.Adoc
CursorType = ctStatic
Parameters = <>
SQL.Strings = (
'Select * From DsEl00 Order By El_No')
Left = 400
Top = 56
end
object DataSource1: TDataSource
DataSet = ADOQ_DsEl00
Left = 456
Top = 72
end
object ADOQ_DsOdid: TADOQuery
Connection = DataM1.Adoc
Parameters = <>
SQL.Strings = (
'Select * From DsOdId Order By Fid')
Left = 320
Top = 56
end
object ADOQ_DsUser: TADOQuery
Connection = DataM1.Adoc
Parameters = <>
SQL.Strings = (
'Select * From DsUser Order By FuserID')
Left = 328
Top = 104
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -