📄 khxxunit.dfm
字号:
end
object tel1: TEdit
Left = 427
Top = 112
Width = 165
Height = 20
TabOrder = 13
Text = 'tel1'
OnKeyPress = khmKeyPress
end
object tel2: TEdit
Left = 427
Top = 149
Width = 165
Height = 20
TabOrder = 14
Text = 'tel2'
OnKeyPress = khmKeyPress
end
object cz: TEdit
Left = 427
Top = 186
Width = 165
Height = 20
TabOrder = 15
Text = 'cz'
OnKeyPress = khmKeyPress
end
object email: TEdit
Left = 427
Top = 223
Width = 165
Height = 20
TabOrder = 16
Text = 'email'
OnKeyPress = khmKeyPress
end
object yb: TEdit
Left = 427
Top = 260
Width = 165
Height = 20
TabOrder = 17
Text = 'yb'
OnKeyPress = khmKeyPress
end
object ywy: TEdit
Left = 427
Top = 297
Width = 165
Height = 20
TabOrder = 18
Text = 'ywy'
OnKeyPress = khmKeyPress
end
object bz: TEdit
Left = 192
Top = 340
Width = 149
Height = 20
Color = clMenu
TabOrder = 19
Text = 'bz'
OnDblClick = bzDblClick
OnKeyPress = khmKeyPress
end
object khlx: TComboBox
Left = 128
Top = 104
Width = 184
Height = 20
ItemHeight = 12
TabOrder = 20
Text = 'khlx'
end
object GroupBox4: TGroupBox
Left = 200
Top = 72
Width = 297
Height = 225
Caption = '备注'
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
ParentFont = False
TabOrder = 21
object Panel1: TPanel
Left = 2
Top = 189
Width = 293
Height = 34
Align = alBottom
Caption = 'ok'
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -27
Font.Name = '宋体'
Font.Style = []
ParentFont = False
TabOrder = 0
OnClick = Panel1Click
end
object Memo1: TMemo
Left = 2
Top = 15
Width = 293
Height = 174
Align = alClient
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
Lines.Strings = (
'Memo1')
ParentFont = False
TabOrder = 1
end
end
end
object TabSheet2: TTabSheet
Caption = '客户信息浏览'
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ImageIndex = 1
ParentFont = False
object Panel2: TPanel
Left = 0
Top = 0
Width = 785
Height = 63
Align = alTop
BevelOuter = bvNone
TabOrder = 0
object GroupBox2: TGroupBox
Left = 0
Top = 0
Width = 526
Height = 63
Caption = '简单查询'
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
ParentFont = False
TabOrder = 0
object Label20: TLabel
Left = 8
Top = 32
Width = 52
Height = 13
Caption = '客户简称'
end
object Label21: TLabel
Left = 184
Top = 32
Width = 26
Height = 13
Caption = '邮编'
end
object Label22: TLabel
Left = 344
Top = 32
Width = 39
Height = 13
Caption = '业务员'
end
object ajc: TEdit
Left = 72
Top = 28
Width = 95
Height = 20
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ImeName = '全拼输入法'
ParentFont = False
TabOrder = 0
Text = 'ajc'
OnChange = ajcChange
end
object ayb: TEdit
Left = 224
Top = 28
Width = 100
Height = 20
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ImeName = '全拼输入法'
ParentFont = False
TabOrder = 1
Text = 'ayb'
OnChange = ajcChange
end
object aywy: TEdit
Left = 392
Top = 28
Width = 102
Height = 20
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ImeName = '全拼输入法'
ParentFont = False
TabOrder = 2
Text = 'aywy'
OnChange = ajcChange
end
end
object BitBtn5: TBitBtn
Left = 548
Top = 19
Width = 72
Height = 28
Caption = '删除'
TabOrder = 1
OnClick = BitBtn5Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000130B0000130B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
333333333333333333333333333333333333333FFF33FF333FFF339993370733
999333777FF37FF377733339993000399933333777F777F77733333399970799
93333333777F7377733333333999399933333333377737773333333333990993
3333333333737F73333333333331013333333333333777FF3333333333910193
333333333337773FF3333333399000993333333337377737FF33333399900099
93333333773777377FF333399930003999333337773777F777FF339993370733
9993337773337333777333333333333333333333333333333333333333333333
3333333333333333333333333333333333333333333333333333}
NumGlyphs = 2
end
object BitBtn7: TBitBtn
Left = 620
Top = 19
Width = 71
Height = 28
Caption = '退出'
TabOrder = 2
OnClick = BitBtn7Click
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
0000377777777777777703030303030303037F7F7F7F7F7F7F7F000000000000
00007777777777777777933393303933337073F37F37F73F3377393393303393
379037FF7F37F37FF777379793303379793037777337F3777737339933303339
93303377F3F7F3F77F3733993930393993303377F737F7377FF7399993303399
999037777337F377777793993330333393307377FF37F3337FF7333993303333
993033377F37F33377F7333993303333993033377337F3337737333333303333
33303FFFFFF7FFFFFFF700000000000000007777777777777777030303030303
03037F7F7F7F7F7F7F7F00000000000000007777777777777777}
NumGlyphs = 2
end
end
object DBGrid1: TDBGrid
Left = 0
Top = 63
Width = 785
Height = 361
Align = alClient
DataSource = DataSource1
ImeName = '全拼输入法'
TabOrder = 1
TitleFont.Charset = GB2312_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -12
TitleFont.Name = '宋体'
TitleFont.Style = []
OnDblClick = DBGrid1DblClick
OnMouseMove = DBGrid1MouseMove
end
object GroupBox3: TGroupBox
Left = 208
Top = 104
Width = 297
Height = 225
Caption = '备注'
Font.Charset = GB2312_CHARSET
Font.Color = clBlue
Font.Height = -13
Font.Name = '宋体'
Font.Style = []
ParentFont = False
TabOrder = 2
object Panel3: TPanel
Left = 2
Top = 189
Width = 293
Height = 34
Align = alBottom
Caption = 'ok'
Font.Charset = GB2312_CHARSET
Font.Color = clRed
Font.Height = -27
Font.Name = '宋体'
Font.Style = []
ParentFont = False
TabOrder = 0
OnClick = Panel3Click
end
object Memo2: TMemo
Left = 2
Top = 15
Width = 293
Height = 174
Align = alClient
Font.Charset = GB2312_CHARSET
Font.Color = clBlack
Font.Height = -12
Font.Name = '宋体'
Font.Style = []
ImeName = '全拼输入法'
Lines.Strings = (
'Memo1')
ParentFont = False
TabOrder = 1
end
end
end
end
object Query1: TQuery
AfterOpen = Query1AfterOpen
DatabaseName = 'jxc'
Left = 148
Top = 159
end
object DataSource1: TDataSource
DataSet = Query1
Left = 116
Top = 159
end
object PopupMenu1: TPopupMenu
Left = 280
Top = 8
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -