RTFormwork/项目代码/RTBasicsV1/A01基础公司管理/U_Customer.dfm
2024-08-27 15:48:31 +08:00

553 lines
15 KiB
Plaintext

inherited frmCustomer: TfrmCustomer
Left = 347
Top = 169
Caption = #23458#25143#36164#26009#31649#29702
ClientHeight = 611
ClientWidth = 1366
Font.Height = -16
FormStyle = fsMDIChild
Position = poScreenCenter
Visible = True
ExplicitWidth = 1382
ExplicitHeight = 650
PixelsPerInch = 96
TextHeight = 21
object ToolBar1: TToolBar [0]
Tag = 1
Left = 0
Top = 0
Width = 1366
Height = 30
AutoSize = True
ButtonHeight = 30
ButtonWidth = 115
Caption = 'ToolBar1'
Color = clWhite
DisabledImages = DataLink_Company.cxImageList_bar
GradientEndColor = 15717318
Images = DataLink_Company.cxImageList_bar
List = True
ParentColor = False
ShowCaptions = True
TabOrder = 0
object TBRafresh: TToolButton
Left = 0
Top = 0
AutoSize = True
Caption = #21047#26032
ImageIndex = 1
OnClick = TBRafreshClick
end
object btnAdd: TToolButton
Left = 71
Top = 0
AutoSize = True
Caption = #26032#22686
ImageIndex = 9
OnClick = btnAddClick
end
object btnEdit: TToolButton
Left = 142
Top = 0
AutoSize = True
Caption = #20462#25913
ImageIndex = 3
OnClick = btnEditClick
end
object TBDel: TToolButton
Left = 213
Top = 0
AutoSize = True
Caption = #21024#38500
ImageIndex = 5
OnClick = TBDelClick
end
object btnSaleser: TToolButton
Left = 284
Top = 0
AutoSize = True
Caption = #25351#23450#19994#21153#21592
ImageIndex = 15
OnClick = btnSaleserClick
end
object btnTallyer: TToolButton
Left = 403
Top = 0
AutoSize = True
Caption = #25351#23450#29702#21333
ImageIndex = 15
OnClick = btnTallyerClick
end
object btnChk: TToolButton
Left = 506
Top = 0
AutoSize = True
Caption = #23457#26680
ImageIndex = 12
OnClick = btnChkClick
end
object btnReChk: TToolButton
Left = 577
Top = 0
AutoSize = True
Caption = #25764#38144#23457#26680
ImageIndex = 11
OnClick = btnReChkClick
end
object ToolButton3: TToolButton
Left = 680
Top = 0
AutoSize = True
Caption = #38468#20214
ImageIndex = 22
OnClick = ToolButton3Click
end
object ToolButton1: TToolButton
Left = 751
Top = 0
AutoSize = True
Caption = #20445#23384#26684#24335
ImageIndex = 16
OnClick = ToolButton1Click
end
object TBClose: TToolButton
Left = 854
Top = 0
AutoSize = True
Caption = #20851#38381
ImageIndex = 7
OnClick = TBCloseClick
end
end
object Panel1: TPanel [1]
Left = 0
Top = 30
Width = 1366
Height = 62
Align = alTop
BevelInner = bvRaised
BevelOuter = bvLowered
Color = clWhite
ParentBackground = False
TabOrder = 1
object Label3: TLabel
Left = 205
Top = 20
Width = 32
Height = 21
Caption = #20840#31216
end
object Label1: TLabel
Left = 22
Top = 20
Width = 32
Height = 21
Caption = #32534#21495
end
object Label2: TLabel
Left = 389
Top = 20
Width = 48
Height = 21
Caption = #19994#21153#21592
end
object Label4: TLabel
Left = 586
Top = 20
Width = 32
Height = 21
Caption = #22269#23478
end
object CoName: TcxTextEdit
Tag = 2
Left = 243
Top = 16
ParentFont = False
Properties.OnChange = CoCodePropertiesChange
TabOrder = 1
OnKeyPress = CoCodeKeyPress
Width = 120
end
object CoCode: TcxTextEdit
Tag = 2
Left = 60
Top = 16
ParentFont = False
Properties.OnChange = CoCodePropertiesChange
TabOrder = 0
OnKeyPress = CoCodeKeyPress
Width = 120
end
object Salesman: TcxTextEdit
Tag = 2
Left = 440
Top = 16
ParentFont = False
Properties.OnChange = CoCodePropertiesChange
TabOrder = 2
OnKeyPress = CoCodeKeyPress
Width = 120
end
object country: TcxTextEdit
Tag = 2
Left = 621
Top = 16
ParentFont = False
Properties.OnChange = CoCodePropertiesChange
TabOrder = 3
OnKeyPress = CoCodeKeyPress
Width = 120
end
end
object cxGrid1: TcxGrid [2]
Left = 0
Top = 121
Width = 1366
Height = 287
Align = alClient
TabOrder = 2
object Tv1: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
Navigator.Buttons.Delete.Enabled = False
Navigator.Buttons.Delete.Visible = False
ScrollbarAnnotations.CustomAnnotations = <>
OnFocusedRecordChanged = Tv1FocusedRecordChanged
DataController.DataSource = DS_1
DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost]
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end>
DataController.Summary.SummaryGroups = <>
OptionsBehavior.GoToNextCellOnEnter = True
OptionsCustomize.ColumnFiltering = False
OptionsData.Deleting = False
OptionsData.DeletingConfirmation = False
OptionsSelection.MultiSelect = True
OptionsSelection.CheckBoxVisibility = [cbvDataRow, cbvColumnHeader]
OptionsView.GroupByBox = False
object v2Column2: TcxGridDBColumn
Caption = #32534#21495
DataBinding.FieldName = 'CoCode'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 86
end
object v2Column6: TcxGridDBColumn
Caption = #20840#31216
DataBinding.FieldName = 'CoName'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 127
end
object v2Column15: TcxGridDBColumn
Caption = #31616#31216
DataBinding.FieldName = 'CoAbbrName'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 100
end
object v2Column10: TcxGridDBColumn
Caption = #19994#21153#21592
DataBinding.FieldName = 'Saleser'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 84
end
object v2Column7: TcxGridDBColumn
Caption = #20844#21496#22320#22336
DataBinding.FieldName = 'CoAddress'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 80
end
object v2Column1: TcxGridDBColumn
Caption = #22791#27880
DataBinding.FieldName = 'Note'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 163
end
object v2Column3: TcxGridDBColumn
Caption = #22269#23478
DataBinding.FieldName = 'cocountry'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 99
end
object Tv1Column2: TcxGridDBColumn
Caption = #23458#25143#31561#32423
DataBinding.FieldName = 'CoLevel'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 115
end
object Tv1Column3: TcxGridDBColumn
Caption = #30331#35760#26102#38388
DataBinding.FieldName = 'Filltime'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 157
end
object Tv1Column4: TcxGridDBColumn
Caption = #30331#35760#20154
DataBinding.FieldName = 'Filler'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 66
end
object Tv1Column5: TcxGridDBColumn
Caption = #29702#21333
DataBinding.FieldName = 'Tallyer'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 99
end
object Tv1Column7: TcxGridDBColumn
Caption = #19978#32423#21333#20301
DataBinding.FieldName = 'ParentCoName'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 86
end
object Tv1Column1: TcxGridDBColumn
DataBinding.FieldName = 'COID'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 73
end
object Tv1Column6: TcxGridDBColumn
Caption = #23458#25143#31867#22411
DataBinding.FieldName = 'CoBusinessType'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 66
end
end
object cxGridLevel1: TcxGridLevel
GridView = Tv1
end
end
object Panel2: TPanel [3]
Left = 0
Top = 408
Width = 1366
Height = 203
Align = alBottom
Caption = 'Panel2'
TabOrder = 3
object cxGrid2: TcxGrid
Left = 1
Top = 1
Width = 1364
Height = 201
Align = alClient
TabOrder = 0
object Tv2: TcxGridDBTableView
Navigator.Buttons.CustomButtons = <>
Navigator.Buttons.Delete.Enabled = False
Navigator.Buttons.Delete.Visible = False
ScrollbarAnnotations.CustomAnnotations = <>
DataController.DataSource = DS_2
DataController.Summary.DefaultGroupSummaryItems = <>
DataController.Summary.FooterSummaryItems = <
item
Kind = skSum
end
item
Kind = skSum
end
item
Kind = skSum
end>
DataController.Summary.SummaryGroups = <>
OptionsBehavior.GoToNextCellOnEnter = True
OptionsCustomize.ColumnFiltering = False
OptionsData.Deleting = False
OptionsData.DeletingConfirmation = False
OptionsView.GroupByBox = False
object v3Column3: TcxGridDBColumn
Caption = #40664#35748
DataBinding.FieldName = 'IsDefault'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxCheckBoxProperties'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 76
end
object cxGridDBColumn1: TcxGridDBColumn
Caption = #32852#31995#20154
DataBinding.FieldName = 'Contacts'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxTextEditProperties'
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 70
end
object cxGridDBColumn2: TcxGridDBColumn
Caption = #32844#20301
DataBinding.FieldName = 'position'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxTextEditProperties'
Properties.CharCase = ecUpperCase
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 70
end
object cxGridDBColumn4: TcxGridDBColumn
Caption = #32852#31995#30005#35805
DataBinding.FieldName = 'Telephone'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxTextEditProperties'
Properties.CharCase = ecUpperCase
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 99
end
object cxGridDBColumn5: TcxGridDBColumn
Caption = #25163#26426#21495
DataBinding.FieldName = 'PhoneNumber'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxTextEditProperties'
Properties.CharCase = ecUpperCase
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 102
end
object Tv2Column1: TcxGridDBColumn
Caption = 'EMAIL'
DataBinding.FieldName = 'Email'
DataBinding.IsNullValueType = True
PropertiesClassName = 'TcxTextEditProperties'
Properties.CharCase = ecUpperCase
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 108
end
object v3Column2: TcxGridDBColumn
Caption = #24494#20449#21495
DataBinding.FieldName = 'WeChat'
DataBinding.IsNullValueType = True
HeaderAlignmentHorz = taCenter
Options.Editing = False
Width = 169
end
end
object cxGridLevel2: TcxGridLevel
GridView = Tv2
end
end
end
object cxTabControl1: TcxTabControl [4]
Left = 0
Top = 92
Width = 1366
Height = 29
Align = alTop
TabOrder = 4
Properties.CustomButtons.Buttons = <>
Properties.Style = 11
Properties.TabIndex = 0
Properties.Tabs.Strings = (
#26410#23457#26680
#24050#23457#26680
#20840#37096)
LookAndFeel.Kind = lfUltraFlat
OnChange = cxTabControl1Change
ClientRectRight = 0
ClientRectTop = 0
end
inherited ADOQueryBaseCmd: TADOQuery
Connection = DataLink_Company.ADOLink
Left = 297
Top = 162
end
inherited ADOQueryBaseTemp: TADOQuery
Connection = DataLink_Company.ADOLink
Left = 159
Top = 160
end
object ADOQueryTemp: TADOQuery
Connection = DataLink_Company.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 623
Top = 186
end
object ADOQueryCmd: TADOQuery
Connection = DataLink_Company.ADOLink
Parameters = <>
Left = 716
Top = 182
end
object ADOQueryMain: TADOQuery
Connection = DataLink_Company.ADOLink
LockType = ltReadOnly
Parameters = <>
Left = 799
Top = 187
end
object GPM_1: TcxGridPopupMenu
Grid = cxGrid1
PopupMenus = <>
Left = 540
Top = 184
end
object DS_1: TDataSource
DataSet = CDS_1
Left = 472
Top = 285
end
object CDS_1: TClientDataSet
Aggregates = <>
Params = <>
Left = 405
Top = 289
end
object CDS_2: TClientDataSet
Aggregates = <>
Params = <>
Left = 384
Top = 460
end
object DS_2: TDataSource
DataSet = CDS_2
Left = 459
Top = 467
end
object OpenDialog1: TOpenDialog
Left = 469
Top = 188
end
object GPM_2: TcxGridPopupMenu
Grid = cxGrid2
PopupMenus = <>
Left = 320
Top = 456
end
end