📄 baiandj.dfm
字号:
Shape = bsFrame
end
object Bevel10: TBevel
Left = 8
Top = 168
Width = 665
Height = 121
Shape = bsFrame
end
object Bevel2: TBevel
Left = 8
Top = 96
Width = 665
Height = 65
Shape = bsFrame
end
object Bevel3: TBevel
Left = 273
Top = 96
Width = 7
Height = 65
Shape = bsLeftLine
end
object Bevel4: TBevel
Left = 464
Top = 96
Width = 9
Height = 65
Shape = bsLeftLine
end
object BitBtn1: TBitBtn
Left = 120
Top = 120
Width = 73
Height = 25
Caption = #30331#35760
Font.Charset = DEFAULT_CHARSET
Font.Color = clGreen
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 0
OnClick = BitBtn1Click
Glyph.Data = {
42020000424D4202000000000000420000002800000010000000100000000100
1000030000000002000000000000000000000000000000000000007C0000E003
00001F0000001F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C
1F7C1F7C1F7CFF7FFF7FFF7FFF7FFF7FFF7FB356B556B556FF7FFF7FFF7FFF7F
FF7F1F7C1F7CFF7FFF7FFF7FFF7FFF7FB556FF7FFF7FFF7FFF7FFF7FFF7FFF7F
FF7F1F7C1F7CFF7FFF7F5330533851300000533053385130533853305338FF7F
FF7F1F7C1F7CFF7FFF7FFF7FFF7FFF7F0000C6300629FF7FFF7FFF7FFF7FFF7F
FF7F1F7C1F7CFF7FFF7F9744FF7F9744594CF37E8C5D84180A459744594CFF7F
FF7F1F7C1F7CFF7FFF7FFF7FFF7FFF7FFF7F8E5D736E8E5DC4188420FF7FFF7F
FF7F1F7C1F7CFF7FFF7FFF7FFF7FFF7FFF7FFF7FB57E7176464D82184220FF7F
FF7F1F7C1F7CFF7FFF7FFF7FC2098209C209C209FF7F2A7E444D464D82188420
FF7F1F7C1F7CFF7FFF7FC009FF7FC209FF7FFF7F8209994C287E444D464D8218
44201F7C1F7CFF7FFF7FC209C209C209C209C209FF7FFF7FFF7F2A7E444D464D
821884201F7CFF7FFF7FFF7F8211FF7F8211FF7FFF7F55385744FF7F287E444D
464D82181F7CFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F2A7E
444D464D1F7CFF7FFF7FFF7FFF7FB556FF7F3546B556B556FF7FFF7FFF7FFF7F
287E444D1F7CFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7FFF7F
FF7F2A7E1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C1F7C
1F7C1F7C1F7C}
end
object BitBtn2: TBitBtn
Left = 336
Top = 120
Width = 73
Height = 25
Caption = #26597#35810
Font.Charset = DEFAULT_CHARSET
Font.Color = clPurple
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 1
OnClick = BitBtn2Click
Glyph.Data = {
DE010000424DDE01000000000000760000002800000024000000120000000100
0400000000006801000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00388888888877
F7F787F8888888888333333F00004444400888FFF444448888888888F333FF8F
000033334D5007FFF4333388888888883338888F0000333345D50FFFF4333333
338F888F3338F33F000033334D5D0FFFF43333333388788F3338F33F00003333
45D50FEFE4333333338F878F3338F33F000033334D5D0FFFF43333333388788F
3338F33F0000333345D50FEFE4333333338F878F3338F33F000033334D5D0FFF
F43333333388788F3338F33F0000333345D50FEFE4333333338F878F3338F33F
000033334D5D0EFEF43333333388788F3338F33F0000333345D50FEFE4333333
338F878F3338F33F000033334D5D0EFEF43333333388788F3338F33F00003333
4444444444333333338F8F8FFFF8F33F00003333333333333333333333888888
8888333F00003333330000003333333333333FFFFFF3333F00003333330AAAA0
333333333333888888F3333F00003333330000003333333333338FFFF8F3333F
0000}
NumGlyphs = 2
end
object BitBtn7: TBitBtn
Left = 544
Top = 120
Width = 81
Height = 25
Caption = #20851#38381
Font.Charset = DEFAULT_CHARSET
Font.Color = clMaroon
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
TabOrder = 2
OnClick = BitBtn7Click
Glyph.Data = {
DE010000424DDE01000000000000760000002800000024000000120000000100
0400000000006801000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333333333333333333333000033338833333333333333333F333333333333
0000333911833333983333333388F333333F3333000033391118333911833333
38F38F333F88F33300003339111183911118333338F338F3F8338F3300003333
911118111118333338F3338F833338F3000033333911111111833333338F3338
3333F8330000333333911111183333333338F333333F83330000333333311111
8333333333338F3333383333000033333339111183333333333338F333833333
00003333339111118333333333333833338F3333000033333911181118333333
33338333338F333300003333911183911183333333383338F338F33300003333
9118333911183333338F33838F338F33000033333913333391113333338FF833
38F338F300003333333333333919333333388333338FFF830000333333333333
3333333333333333333888330000333333333333333333333333333333333333
0000}
NumGlyphs = 2
end
object edtshenfen: TEdit
Left = 72
Top = 184
Width = 177
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
TabOrder = 3
Text = 'edtshenfen'
end
object edtname: TEdit
Left = 344
Top = 184
Width = 81
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
TabOrder = 4
Text = 'edtname'
end
object edtVisitor: TEdit
Left = 544
Top = 192
Width = 97
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
TabOrder = 5
Text = 'edtVisitor'
end
object dtpDate: TDateTimePicker
Left = 72
Top = 216
Width = 177
Height = 21
Date = 39532.468549259260000000
Time = 39532.468549259260000000
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
TabOrder = 6
end
object cbField: TComboBox
Left = 144
Top = 256
Width = 97
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
ItemHeight = 13
TabOrder = 7
Text = 'building'
Items.Strings = (
'Building'
'doorNumber'
'name'
'telphone')
end
object cbCondition: TComboBox
Left = 344
Top = 256
Width = 97
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
ItemHeight = 13
ItemIndex = 0
TabOrder = 8
Text = '='
Items.Strings = (
'='
'like')
end
object edtvalue: TEdit
Left = 544
Top = 256
Width = 105
Height = 21
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
TabOrder = 9
Text = 'edtvalue'
end
object DBGrid1: TDBGrid
Left = 24
Top = 336
Width = 649
Height = 97
DataSource = DataSource1
ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
TabOrder = 10
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
end
end
object ADOConnection1: TADOConnection
ConnectionString =
'Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source=F:\'#20303#25151 +
#31649#29702#31995#32479'\data\house.mdb;Mode=Share Deny None;Extended Properties="";' +
'Persist Security Info=False;Jet OLEDB:System database="";Jet OLE' +
'DB:Registry Path="";Jet OLEDB:Database Password="";Jet OLEDB:Eng' +
'ine Type=5;Jet OLEDB:Database Locking Mode=1;Jet OLEDB:Global Pa' +
'rtial Bulk Ops=2;Jet OLEDB:Global Bulk Transactions=1;Jet OLEDB:' +
'New Database Password="";Jet OLEDB:Create System Database=False;' +
'Jet OLEDB:Encrypt Database=False;Jet OLEDB:Don'#39't Copy Locale on ' +
'Compact=False;Jet OLEDB:Compact Without Replica Repair=False;Jet' +
' OLEDB:SFP=False'
LoginPrompt = False
Provider = 'Microsoft.Jet.OLEDB.4.0'
Left = 152
Top = 24
end
object ADOQuery1: TADOQuery
Connection = ADOConnection1
Parameters = <>
Left = 96
Top = 24
end
object DataSource1: TDataSource
DataSet = ADOQuery1
Left = 48
Top = 24
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -