📄 bas_findipdata.dfm
字号:
TabOrder = 5
Width = 121
end
object Edit8: TDBRBEdit
Left = 544
Top = 250
ParentFont = False
Properties.Buttons = <
item
Default = True
Glyph.Data = {
36030000424D3603000000000000360000002800000010000000100000000100
18000000000000030000130B0000130B00000000000000000000FFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFF4E0D0F0CE98EFC993EDC491ECBF8FEABA8CE9
B587E7B283E9B686EBBC8AECC28DEEC791F0CD97F5E7DCFFFFFFFFFFFFFEC688
FAC24CFACC68F7D684ECD496EAD8A5EADAAEE9DAAEE8D7A7EBD59AF8D88BFAD0
70FAC654FEE7D4FFFFFFFFFFFFFDB27BF2A64CF3B367DEA06AD28647C37445C8
7E47C77C47C17345D18748E0A570F4B76EF3AA54FEDAC5FFFFFFFFFFFFFCA570
F1964FF3A466E38E63E89886DF7A65E48A78E38775E07A66E99A89E59269F3A8
6DF39A56FDCCB3FFFFFFFFFFFFFC9663F0834DF19161F39F77ED9E7EDA7A55E7
834AE67F49DC8058EEA282F3A37CF29568F18753FDB99DFFFFFFFFFFFFFC8657
EF704AF07C59F28A6BF1957AD87A5CE58E65E48A63DA8061F2997EF28E6FF180
5EF0744FFDA485FFFFFFFFFFFFFC7949EE6243EF6B4FF0765BEF8067DC775FEA
9579E99176DE7C64F0826AF07960EF6E53EF6547FD8A66FFFFFFFFFFFFFB6D39
ED5A3AEE6143EE684BED6E53D76440E4773FE3743FD86841EE7056EF6A4EEE63
46EE5C3DFD6F41FFFFFFFFFFFFFA6530EA502FEA5535EA5A3BE95E40D5654CE2
896EE1866BD5684FE95F42EB5B3CEA5636EA5131FC602EFFFFFFFFFFFFF8612B
E54624E44826E04A2ACE472AD36445EB9267EA8D65D36847D0482BE24B2BE449
28E54725FA5C2AFFFFFFFFFFFFF65D26DF3C19DF3F1CCD391AD16B2FD06438E5
824CE57E4BD06639D26D2FCF3A1BDF3E1CDF3D1AF85926FFFFFFFFFFFFF35A22
D93310D83310CF3112E59082DC725FE18474E08071DD7260E59384CF3213D834
11D93410F65622FFFFFFFFFFFFF0561FD4300DD4300DD4300DD2300DD2300DD2
300DD2300DD22F0DD2300DD4300DD4300DD42F0DF3521FFFFFFFFFFFFFEF7B55
E9957AE9957AE9957AE9957AE9957AE9957AE9957AE9957AE9957AE9957AE995
7AE99579EE7755FFFFFFFFFFFFF6DADCFCC2C5FCC2C5FCC2C5FCC2C5FCC2C5FC
C2C5FCC2C5FCC2C5FCC2C5FCC2C5FCC2C5FCC2C5F7E0E1FFFFFF}
Kind = bkGlyph
end>
Properties.OnButtonClick = Edit8PropertiesButtonClick
Style.Edges = [bBottom]
Style.Font.Charset = DEFAULT_CHARSET
Style.Font.Color = clWindowText
Style.Font.Height = -19
Style.Font.Name = #23435#20307
Style.Font.Style = []
Style.ButtonTransparency = ebtNone
TabOrder = 6
Width = 425
end
object Edit9: TDBRBEdit
Left = 70
Top = 296
ParentFont = False
Properties.Buttons = <
item
Default = True
Glyph.Data = {
36030000424D3603000000000000360000002800000010000000100000000100
18000000000000030000130B0000130B00000000000000000000FFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFFF
FFFFFFFFFFFFFFFFFFFFFFFFFFF4E0D0F0CE98EFC993EDC491ECBF8FEABA8CE9
B587E7B283E9B686EBBC8AECC28DEEC791F0CD97F5E7DCFFFFFFFFFFFFFEC688
FAC24CFACC68F7D684ECD496EAD8A5EADAAEE9DAAEE8D7A7EBD59AF8D88BFAD0
70FAC654FEE7D4FFFFFFFFFFFFFDB27BF2A64CF3B367DEA06AD28647C37445C8
7E47C77C47C17345D18748E0A570F4B76EF3AA54FEDAC5FFFFFFFFFFFFFCA570
F1964FF3A466E38E63E89886DF7A65E48A78E38775E07A66E99A89E59269F3A8
6DF39A56FDCCB3FFFFFFFFFFFFFC9663F0834DF19161F39F77ED9E7EDA7A55E7
834AE67F49DC8058EEA282F3A37CF29568F18753FDB99DFFFFFFFFFFFFFC8657
EF704AF07C59F28A6BF1957AD87A5CE58E65E48A63DA8061F2997EF28E6FF180
5EF0744FFDA485FFFFFFFFFFFFFC7949EE6243EF6B4FF0765BEF8067DC775FEA
9579E99176DE7C64F0826AF07960EF6E53EF6547FD8A66FFFFFFFFFFFFFB6D39
ED5A3AEE6143EE684BED6E53D76440E4773FE3743FD86841EE7056EF6A4EEE63
46EE5C3DFD6F41FFFFFFFFFFFFFA6530EA502FEA5535EA5A3BE95E40D5654CE2
896EE1866BD5684FE95F42EB5B3CEA5636EA5131FC602EFFFFFFFFFFFFF8612B
E54624E44826E04A2ACE472AD36445EB9267EA8D65D36847D0482BE24B2BE449
28E54725FA5C2AFFFFFFFFFFFFF65D26DF3C19DF3F1CCD391AD16B2FD06438E5
824CE57E4BD06639D26D2FCF3A1BDF3E1CDF3D1AF85926FFFFFFFFFFFFF35A22
D93310D83310CF3112E59082DC725FE18474E08071DD7260E59384CF3213D834
11D93410F65622FFFFFFFFFFFFF0561FD4300DD4300DD4300DD2300DD2300DD2
300DD2300DD22F0DD2300DD4300DD4300DD42F0DF3521FFFFFFFFFFFFFEF7B55
E9957AE9957AE9957AE9957AE9957AE9957AE9957AE9957AE9957AE9957AE995
7AE99579EE7755FFFFFFFFFFFFF6DADCFCC2C5FCC2C5FCC2C5FCC2C5FCC2C5FC
C2C5FCC2C5FCC2C5FCC2C5FCC2C5FCC2C5FCC2C5F7E0E1FFFFFF}
Kind = bkGlyph
end>
Properties.OnButtonClick = Edit9PropertiesButtonClick
Style.Edges = [bBottom]
Style.Font.Charset = DEFAULT_CHARSET
Style.Font.Color = clWindowText
Style.Font.Height = -19
Style.Font.Name = #23435#20307
Style.Font.Style = []
Style.ButtonTransparency = ebtNone
TabOrder = 7
Width = 899
end
object Edit10: TSWNumEdit
Left = 368
Top = 15
Width = 65
Height = 27
Alignment = taRightJustify
BorderColor = clBlack
Layout = tlCenter
Keys = [ksReturn]
DisplayFormat = '##0'
BevelEdges = [beBottom]
BevelKind = bkSoft
BorderStyle = bsNone
TabOrder = 8
Text = '0'
end
object Edit5: TcxMemo
Left = 94
Top = 163
ParentFont = False
Style.Font.Charset = DEFAULT_CHARSET
Style.Font.Color = clWindowText
Style.Font.Height = -19
Style.Font.Name = #23435#20307
Style.Font.Style = []
TabOrder = 9
Height = 78
Width = 763
end
object Memo1: TMemo
Left = 888
Top = 16
Width = 273
Height = 183
Ctl3D = False
ParentCtl3D = False
TabOrder = 10
Visible = False
end
end
object DBGridEh1: TDBGridEh
Left = 0
Top = 331
Width = 784
Height = 121
Align = alClient
DataSource = DataSource1
FixedColor = 14085099
Flat = True
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = #23435#20307
Font.Style = []
FooterColor = clYellow
FooterFont.Charset = DEFAULT_CHARSET
FooterFont.Color = clWindowText
FooterFont.Height = -12
FooterFont.Name = #23435#20307
FooterFont.Style = []
FooterRowCount = 1
FrozenCols = 2
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
OptionsEh = [dghFixed3D, dghFrozen3D, dghFooter3D, dghHighlightFocus, dghClearSelection, dghEnterAsTab, dghTraceColSizing, dghRowHighlight, dghDblClickOptimizeColWidth, dghDialogFind]
ParentFont = False
ReadOnly = True
TabOrder = 1
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Height = -15
TitleFont.Name = #24188#22278
TitleFont.Style = []
UseMultiTitle = True
OnDblClick = DBGridEh1DblClick
Columns = <
item
EditButtons = <>
FieldName = 'OrderID'
Footers = <>
Title.Caption = #25490#20301
Width = 48
end
item
EditButtons = <>
FieldName = 'SortName'
Footers = <>
Title.Caption = #34892#19994#21517#31216
Width = 79
end
item
EditButtons = <>
FieldName = 'EnglishName'
Footers = <>
Title.Caption = #33521#25991#21517#31216
Width = 172
end
item
EditButtons = <>
FieldName = 'ChineseName'
Footers = <>
Title.Caption = #20013#25991#21517#31216
Width = 134
end
item
EditButtons = <>
FieldName = 'WebSite'
Footers = <>
Title.Caption = #32593#22336
Width = 170
end
item
EditButtons = <>
FieldName = 'ServiceAndProduct'
Footers = <>
Title.Caption = #20135#21697#26381#21153
Width = 219
end
item
EditButtons = <>
FieldName = 'Address'
Footers = <>
Title.Caption = #22320#22336
Width = 142
end
item
EditButtons = <>
FieldName = 'PhoneNo'
Footers = <>
Title.Caption = #30005#35805#21495#30721
Width = 134
end
item
EditButtons = <>
FieldName = 'FaxNo'
Footers = <>
Title.Caption = #20256#30495#21495#30721
Width = 109
end
item
EditButtons = <>
FieldName = 'EMailAddress'
Footers = <>
Title.Caption = #30005#37038
Width = 140
end>
end
end
object TabSheet2: TRzTabSheet
Color = 14085099
Caption = #20449#24687#21015#34920#31383#21475
object RichEdit1: TRichEdit
Left = 0
Top = 0
Width = 784
Height = 452
Align = alClient
Ctl3D = False
Font.Charset = GB2312_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = #23435#20307
Font.Style = []
ParentCtl3D = False
ParentFont = False
PlainText = True
PopupMenu = PopupMenu1
ReadOnly = True
ScrollBars = ssVertical
TabOrder = 0
end
end
end
object DataSource1: TDataSource
DataSet = DataQuery
Left = 641
Top = 335
end
object DataQuery: TMSQuery
Connection = MainForm.MC
SQL.Strings = (
'Select * From Bas_IPRecord')
AfterOpen = DataQueryAfterOpen
Left = 571
Top = 137
end
object WorkQuery: TMSQuery
Connection = MainForm.MC
Left = 640
Top = 164
end
object IdAntiFreeze1: TIdAntiFreeze
OnlyWhenIdle = False
Left = 112
Top = 336
end
object PopupMenu1: TPopupMenu
AutoHotkeys = maManual
AutoLineReduction = maManual
Left = 593
Top = 255
object N1: TMenuItem
Caption = #34892#19994#21517#31216
OnClick = N1Click
end
object N2: TMenuItem
Caption = #20013#25991#21517#31216
OnClick = N2Click
end
object N3: TMenuItem
Caption = #33521#25991#21517#31216
OnClick = N3Click
end
object N4: TMenuItem
Caption = #32593#22336
OnClick = N4Click
end
object N5: TMenuItem
Caption = #20135#21697#26381#21153
OnClick = N5Click
end
object N6: TMenuItem
Caption = #22320#22336
OnClick = N6Click
end
end
end
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -