📄 unit6.dfm
字号:
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -15
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label12: TLabel
Left = 26
Top = 194
Width = 60
Height = 15
Caption = '借出日期'
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -15
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label13: TLabel
Left = 26
Top = 230
Width = 75
Height = 15
Caption = '图纸份数:'
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -15
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label15: TLabel
Left = 26
Top = 93
Width = 75
Height = 15
Caption = '借用类型:'
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -15
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label16: TLabel
Left = 26
Top = 128
Width = 90
Height = 15
Caption = '借阅人单位:'
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -15
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object Label17: TLabel
Left = 26
Top = 59
Width = 75
Height = 15
Caption = '图纸类型:'
Font.Charset = GB2312_CHARSET
Font.Color = clNavy
Font.Height = -15
Font.Name = '宋体'
Font.Style = []
ParentFont = False
end
object RzDBButtonEdit1: TRzDBButtonEdit
Left = 128
Top = 159
Width = 121
Height = 23
DataField = '借阅人'
DataSource = mainData.outDataSource
ImeName = '智能ABC输入法'
TabOrder = 4
OnButtonClick = RzDBButtonEdit1ButtonClick
end
object RzDBDateTimePicker2: TRzDBDateTimePicker
Left = 128
Top = 194
Width = 121
Height = 23
CalAlignment = dtaLeft
CalColors.TitleBackColor = clGray
CalColors.TitleTextColor = clSilver
Date = 37065.6812394676
Time = 37065.6812394676
DateFormat = dfShort
DateMode = dmComboBox
Kind = dtkDate
ParseInput = False
TabOrder = 5
ShowToday = True
ShowTodayCircle = True
ShowWeekNumbers = True
DataField = '借阅时间'
DataSource = mainData.outDataSource
end
object RzDBSpinEdit1: TRzDBSpinEdit
Left = 128
Top = 231
Width = 121
Height = 23
DataField = '数量'
DataSource = mainData.outDataSource
ImeName = '智能ABC输入法'
TabOrder = 6
Alignment = taRightJustify
Increment = 1
Max = 100
PageSize = 10
Value = 1
end
object RzDBEdit9: TRzDBEdit
Left = 128
Top = 24
Width = 177
Height = 23
DataField = '图号'
DataSource = mainData.outDataSource
TabOrder = 0
end
object RzDBMemo2: TRzDBMemo
Left = 320
Top = 24
Width = 225
Height = 89
Hint = '备注'
DataField = '备注'
DataSource = mainData.outDataSource
ImeName = '智能ABC输入法'
TabOrder = 7
end
object RzDBComboBox1: TRzDBComboBox
Left = 128
Top = 89
Width = 121
Height = 23
DataField = '借阅类型'
DataSource = mainData.outDataSource
Style = csDropDownList
ItemHeight = 15
TabOrder = 2
Items.Strings = (
'检验图纸'
'外协图纸')
end
object RzDBButtonEdit2: TRzDBButtonEdit
Left = 128
Top = 124
Width = 177
Height = 23
DataField = '借阅人单位'
DataSource = mainData.outDataSource
TabOrder = 3
OnButtonClick = RzDBButtonEdit2ButtonClick
end
object RzDBMemo3: TRzDBMemo
Left = 320
Top = 124
Width = 225
Height = 131
Hint = '更改记录'
DataField = '更改记录'
DataSource = mainData.outDataSource
ImeName = '智能ABC输入法'
TabOrder = 8
end
object RzDBComboBox4: TRzDBComboBox
Left = 128
Top = 56
Width = 121
Height = 23
DataField = '图纸类型'
DataSource = mainData.outDataSource
ItemHeight = 15
TabOrder = 1
Items.Strings = (
'蓝图'
'草图')
end
end
object DBNavPlus2: TDBNavPlus
Left = 0
Top = 292
Width = 567
Height = 38
DataSource = mainData.outDataSource
VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbInsert, nbEdit, nbPost, nbCancel, nbRefresh]
Align = alBottom
Hints.Strings = (
'移动到第一条记录'
'移动前一条记录'
'移动到下一条记录'
'移动到最后一条记录'
'插入记录'
'删除当前记录'
'修改当前记录'
'确定插入记录(修改)记录操作'
'取消操作'
'刷新数据')
TabOrder = 1
Captions.Strings = (
'顶'
'前'
'后'
'底'
'插入'
'删除'
'修改'
'保存'
'取消'
'刷新')
Spacing = -1
Margin = -1
end
end
object TabSheet4: TTabSheet
Caption = '浏览数据'
ImageIndex = 3
object Splitter1: TSplitter
Left = 0
Top = 173
Width = 567
Height = 3
Cursor = crVSplit
Align = alBottom
end
object Panel5: TPanel
Left = 0
Top = 176
Width = 567
Height = 116
Align = alBottom
BorderWidth = 5
TabOrder = 0
object DBGridEh2: TDBGridEh
Left = 6
Top = 6
Width = 555
Height = 104
Align = alClient
DataSource = mainData.outDataSource
ImeName = '智能ABC输入法'
ReadOnly = True
TabOrder = 0
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -15
TitleFont.Name = '宋体'
TitleFont.Style = []
FooterFont.Charset = GB2312_CHARSET
FooterFont.Color = clWindowText
FooterFont.Height = -15
FooterFont.Name = '宋体'
FooterFont.Style = []
FooterColor = clWindow
TitleHeight = 18
Flat = True
Columns = <
item
FieldName = '借阅类型'
Footers = <>
end
item
FieldName = '借阅人'
Footers = <>
end
item
FieldName = '借阅人单位'
Footers = <>
end
item
FieldName = '数量'
Footers = <>
end
item
FieldName = '份数'
Footers = <>
end
item
FieldName = '借阅时间'
Footers = <>
end>
end
end
object Panel6: TPanel
Left = 0
Top = 0
Width = 567
Height = 173
Align = alClient
BorderWidth = 5
TabOrder = 1
object DBGridEh1: TDBGridEh
Left = 6
Top = 6
Width = 555
Height = 161
Align = alClient
DataSource = mainData.tzDataSource
ImeName = '智能ABC输入法'
TabOrder = 0
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -15
TitleFont.Name = '宋体'
TitleFont.Style = []
FooterFont.Charset = GB2312_CHARSET
FooterFont.Color = clWindowText
FooterFont.Height = -15
FooterFont.Name = '宋体'
FooterFont.Style = []
FooterColor = clWindow
TitleHeight = 18
Flat = True
Columns = <
item
FieldName = '序号'
Footers = <>
end
item
FieldName = '袋号'
Footers = <>
end
item
FieldName = '图纸名称'
Footers = <>
end
item
FieldName = '图号'
Footers = <>
end
item
FieldName = '图纸类型'
Footers = <>
end
item
FieldName = '页数'
Footers = <>
end
item
FieldName = '所属单位'
Footers = <>
end
item
FieldName = '领用时间'
Footers = <>
end
item
FieldName = '整机代号'
Footers = <>
end
item
FieldName = '有效期'
Footers = <>
end>
end
end
object DBNavPlus4: TDBNavPlus
Left = 0
Top = 292
Width = 567
Height = 38
DataSource = mainData.tzDataSource
VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbInsert, nbEdit, nbPost, nbCancel, nbRefresh]
Align = alBottom
TabOrder = 2
Captions.Strings = (
'顶'
'前'
'后'
'底'
'插入'
'删除'
'修改'
'保存'
'取消'
'刷新')
Spacing = -1
Margin = -1
end
end
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -