📄 unit3.dfm
字号:
object Form3: TForm3
Left = 151
Top = 138
BorderStyle = bsNone
Caption = 'Form3'
ClientHeight = 359
ClientWidth = 579
Color = clBtnFace
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -15
Font.Name = '宋体'
Font.Style = []
OldCreateOrder = False
ShowHint = True
OnCreate = FormCreate
PixelsPerInch = 120
TextHeight = 15
object Splitter1: TSplitter
Left = 169
Top = 0
Width = 4
Height = 359
Cursor = crHSplit
end
object Panel1: TPanel
Left = 0
Top = 0
Width = 169
Height = 359
Align = alLeft
BorderWidth = 5
TabOrder = 0
object Panel2: TPanel
Left = 6
Top = 6
Width = 157
Height = 106
Align = alTop
BevelOuter = bvNone
TabOrder = 0
object Label1: TLabel
Left = 10
Top = 51
Width = 45
Height = 15
Caption = '图号:'
end
object Label2: TLabel
Left = 10
Top = 3
Width = 60
Height = 15
Caption = '物资名称'
end
object ComboBox1: TComboBox
Left = 2
Top = 23
Width = 153
Height = 23
Style = csDropDownList
ImeName = '智能ABC输入法'
ItemHeight = 15
TabOrder = 0
OnChange = ComboBox1Change
end
object Edit1: TEdit
Left = 2
Top = 72
Width = 123
Height = 23
TabOrder = 1
end
object BitBtn1: TBitBtn
Left = 130
Top = 72
Width = 25
Height = 25
Hint = '按图号进行模糊查询'
TabOrder = 2
OnClick = BitBtn1Click
Glyph.Data = {
66010000424D6601000000000000760000002800000014000000140000000100
040000000000F000000000000000000000001000000010000000000000000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00DDDDDDDDDDDD
DDDDDDDD0000DDDDDDDDDDD77D77D77D0000DDD707DDDD007007007D0000DD73
307DDD00D00D00DD0000DD7F3307DDDDDDDDDDDD0000DDD3F3307DDDDDDDDDDD
0000DDDD3F330777777DDDDD0000DDDDD3F330000077DDDD0000DDDDDD3F3378
88707DDD0000DDDDDDD037F8F88707DD0000DDDDDDD07FCCCCC8777D0000DDDD
D4D0F8C8F8C8804D0000DDDDD4408FCCCCCF80DD0000DDDDD4D0F8CFFCF880DD
0000DDDDDD477FCCCC8F774D0000DDDDDDDD07F8F8F70DDD0000DDDDDDDDD07F
8F70DDDD0000DDDDDDDDDD70007DDDDD0000DDDDDDDDDDDDDDDDDDDD0000DDDD
DDDDDDDDDDDDDDDD0000}
end
end
object ListBox1: TListBox
Left = 6
Top = 112
Width = 157
Height = 241
Align = alClient
ImeName = '智能ABC输入法'
ItemHeight = 15
TabOrder = 1
OnClick = ListBox1Click
end
end
object Panel3: TPanel
Left = 173
Top = 0
Width = 406
Height = 359
Align = alClient
BevelOuter = bvNone
TabOrder = 1
object Panel4: TPanel
Left = 0
Top = 0
Width = 406
Height = 64
Align = alTop
BevelOuter = bvNone
BorderWidth = 5
Caption = 'Panel4'
TabOrder = 0
object GroupBox1: TGroupBox
Left = 5
Top = 5
Width = 396
Height = 54
Align = alClient
Caption = '删除数据类型'
TabOrder = 0
object RadioButton1: TRadioButton
Left = 16
Top = 24
Width = 113
Height = 17
Caption = '图纸信息记录'
Checked = True
TabOrder = 0
TabStop = True
OnClick = RadioButton1Click
end
object RadioButton2: TRadioButton
Left = 144
Top = 20
Width = 113
Height = 25
Caption = '图纸借阅记录'
TabOrder = 1
OnClick = RadioButton2Click
end
end
end
object DBNavPlus1: TDBNavPlus
Left = 0
Top = 320
Width = 406
Height = 39
DataSource = DataSource1
VisibleButtons = [nbDelete]
Align = alBottom
Flat = True
TabOrder = 1
Captions.Strings = (
'First'
'Prior'
'Next'
'Last'
'Insert'
'删除'
'Edit'
'Accept'
'Undo'
'Refresh')
Margin = -1
end
object Panel5: TPanel
Left = 0
Top = 64
Width = 406
Height = 256
Align = alClient
BorderWidth = 5
Caption = 'Panel5'
TabOrder = 2
object DBGridEh1: TDBGridEh
Left = 6
Top = 6
Width = 394
Height = 244
Align = alClient
DataSource = DataSource1
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
Flat = True
EditActions = []
end
end
end
object DataSource1: TDataSource
Left = 389
Top = 136
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -