📄 child_lab.dfm
字号:
object frm_YQ_Lab: Tfrm_YQ_Lab
Left = 316
Top = 271
AutoScroll = False
Caption = '仪器库维护'
ClientHeight = 409
ClientWidth = 479
Color = clBtnFace
Constraints.MinHeight = 305
Constraints.MinWidth = 355
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
FormStyle = fsMDIChild
Icon.Data = {
0000010001001010100000000000280100001600000028000000100000002000
00000100040000000000C0000000000000000000000000000000000000000000
0000000080000080000000808000800000008000800080800000C0C0C0008080
80000000FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000CCC0C00C0CCC0000C000C00C0C00C000C0
00CCCC0CCCC000C000C00C0C00C000C000CCCC0CCC000000000000000000FFFF
0000FFFF0000FFFF0000C3C30000C0030000FE7F0000FE7F0000F18F0000C183
0000FFFF0000C5A30000DDAD0000DC210000DDAD0000DC230000FFFF0000}
OldCreateOrder = False
Position = poDefault
Visible = True
OnActivate = FormActivate
OnClose = FormClose
OnCreate = FormCreate
PixelsPerInch = 96
TextHeight = 12
object Panel1: TPanel
Left = 0
Top = 0
Width = 257
Height = 33
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 0
object DBNavigator: TDBNavigator
Left = 8
Top = 4
Width = 200
Height = 25
DataSource = DataSource1
VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast, nbInsert, nbDelete, nbPost, nbCancel]
Flat = True
Ctl3D = False
Hints.Strings = (
'第一笔记录'
'前一笔记录'
'下一笔记录'
'末一笔记录'
'插入记录'
'删除记录'
'编辑记录'
'保存记录'
'取消编辑')
ParentCtl3D = False
TabOrder = 0
end
end
object Panel3: TPanel
Left = 8
Top = 56
Width = 401
Height = 297
BevelInner = bvLowered
BevelOuter = bvLowered
TabOrder = 1
object PageControl1: TPageControl
Left = 10
Top = 10
Width = 351
Height = 247
ActivePage = TabSheet1
TabOrder = 0
OnChange = PageControl1Change
object TabSheet1: TTabSheet
Caption = '单条记录'
ImageIndex = 10
object Label10: TLabel
Left = 8
Top = 136
Width = 24
Height = 12
Caption = '备注'
FocusControl = EditDBEdit10
end
object Label9: TLabel
Left = 168
Top = 96
Width = 48
Height = 12
Caption = '所属实验'
FocusControl = EditDBEdit9
end
object Label8: TLabel
Left = 8
Top = 96
Width = 24
Height = 12
Caption = '分类'
FocusControl = EditDBEdit8
end
object Label7: TLabel
Left = 264
Top = 56
Width = 48
Height = 12
Caption = '放置位置'
FocusControl = EditDBEdit7
end
object Label6: TLabel
Left = 96
Top = 56
Width = 24
Height = 12
Caption = '状况'
end
object Label5: TLabel
Left = 8
Top = 56
Width = 24
Height = 12
Caption = '价格'
FocusControl = EditDBEdit5
end
object Label1: TLabel
Left = 8
Top = 16
Width = 48
Height = 12
Caption = '仪器编号'
FocusControl = EditDBEdit
end
object Label2: TLabel
Left = 136
Top = 16
Width = 48
Height = 12
Caption = '仪器名称'
FocusControl = EditDBEdit2
end
object Label4: TLabel
Left = 168
Top = 56
Width = 48
Height = 12
Caption = '启用日期'
FocusControl = EditDBEdit4
end
object Label3: TLabel
Left = 264
Top = 16
Width = 24
Height = 12
Caption = '型号'
FocusControl = EditDBEdit3
end
object Label13: TLabel
Left = 120
Top = 186
Width = 36
Height = 12
Caption = '借用者'
FocusControl = EditDBEdit10
end
object EditDBEdit10: TDBEdit
Left = 8
Top = 152
Width = 321
Height = 20
DataField = '备注'
DataSource = DataSource1
TabOrder = 0
end
object EditDBEdit5: TDBEdit
Left = 8
Top = 72
Width = 73
Height = 20
DataField = '价格'
DataSource = DataSource1
TabOrder = 1
end
object EditDBEdit7: TDBEdit
Left = 264
Top = 72
Width = 65
Height = 20
DataField = '放置位置'
DataSource = DataSource1
TabOrder = 2
end
object EditDBEdit8: TDBEdit
Left = 8
Top = 112
Width = 55
Height = 20
DataField = '分类'
DataSource = DataSource1
TabOrder = 3
end
object EditDBEdit9: TDBEdit
Left = 168
Top = 112
Width = 57
Height = 20
DataField = '所属实验'
DataSource = DataSource1
TabOrder = 4
end
object EditDBEdit: TDBEdit
Left = 8
Top = 32
Width = 115
Height = 20
DataField = '仪器编号'
DataSource = DataSource1
TabOrder = 5
end
object EditDBEdit2: TDBEdit
Left = 135
Top = 32
Width = 115
Height = 20
DataField = '仪器名称'
DataSource = DataSource1
TabOrder = 6
end
object EditDBEdit3: TDBEdit
Left = 264
Top = 32
Width = 65
Height = 20
DataField = '型号'
DataSource = DataSource1
TabOrder = 7
end
object EditDBEdit4: TDBEdit
Left = 168
Top = 72
Width = 81
Height = 20
DataField = '启用日期'
DataSource = DataSource1
TabOrder = 8
end
object DBEdit2: TDBEdit
Left = 240
Top = 112
Width = 89
Height = 20
Color = clBtnFace
DataField = '名称'
DataSource = DataSource3
ReadOnly = True
TabOrder = 9
end
object DBComboBox1: TDBComboBox
Left = 80
Top = 112
Width = 73
Height = 20
DataField = '状况'
DataSource = DataSource1
ItemHeight = 12
Items.Strings = (
''
'好'
'良好'
'勘用'
'报废'
'待修')
TabOrder = 10
end
object DBEdit1: TDBEdit
Left = 80
Top = 112
Width = 73
Height = 20
Color = clBtnFace
DataField = '名称'
DataSource = DataSource2
ReadOnly = True
TabOrder = 11
end
object DBComboBox2: TDBComboBox
Left = 96
Top = 72
Width = 59
Height = 20
DataField = '状况'
DataSource = DataSource1
ItemHeight = 12
Items.Strings = (
''
'好'
'良好'
'勘用'
'报废'
'待修')
TabOrder = 12
end
object DBCheckBox1: TDBCheckBox
Left = 8
Top = 184
Width = 57
Height = 17
TabStop = False
Caption = '已借出'
DataField = '已借出'
DataSource = DataSource1
TabOrder = 13
ValueChecked = 'False'
ValueUnchecked = 'True'
end
object DBEdit3: TDBEdit
Left = 168
Top = 184
Width = 161
Height = 20
Color = clBtnFace
DataField = '借用人'
DataSource = DataSource1
TabOrder = 14
end
end
object TabSheet2: TTabSheet
Caption = '查询记录'
ImageIndex = 24
object DBGrid1: TDBGrid
Left = 16
Top = 112
Width = 289
Height = 94
DataSource = DataSource1
TabOrder = 0
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = '宋体'
TitleFont.Style = []
end
object Panel2: TPanel
Left = 0
Top = 0
Width = 343
Height = 97
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
TabOrder = 1
object Label22: TLabel
Left = 8
Top = 16
Width = 36
Height = 12
Caption = '仪器名'
end
object Label21: TLabel
Left = 120
Top = 16
Width = 24
Height = 12
Caption = '型号'
WordWrap = True
end
object Label20: TLabel
Left = 8
Top = 40
Width = 36
Height = 12
Caption = '启用日'
end
object Label23: TLabel
Left = 120
Top = 40
Width = 24
Height = 12
Caption = '地方'
end
object SpeedButton1: TSpeedButton
Left = 216
Top = 64
Width = 41
Height = 25
Caption = '查询'
Flat = True
OnClick = SpeedButton1Click
end
object SpeedButton2: TSpeedButton
Left = 280
Top = 64
Width = 41
Height = 25
Caption = '所有'
Flat = True
OnClick = SpeedButton2Click
end
object Label11: TLabel
Left = 240
Top = 16
Width = 24
Height = 12
Caption = '状况'
WordWrap = True
end
object Label12: TLabel
Left = 240
Top = 40
Width = 48
Height = 12
Caption = '所属实验'
end
object Edit_No: TEdit
Left = 152
Top = 8
Width = 81
Height = 20
TabOrder = 0
end
object Edit_name: TEdit
Left = 53
Top = 8
Width = 60
Height = 20
TabOrder = 1
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -