inherited frmCompany: TfrmCompany Left = 347 Top = 169 Caption = #20844#21496#31649#29702 ClientHeight = 831 ClientWidth = 1366 Color = clBtnFace Font.Height = -16 FormStyle = fsMDIChild Position = poScreenCenter Visible = True ExplicitWidth = 1382 ExplicitHeight = 870 PixelsPerInch = 96 TextHeight = 21 object ToolBar1: TToolBar [0] Tag = 1 Left = 0 Top = 0 Width = 1366 Height = 30 AutoSize = True ButtonHeight = 30 ButtonWidth = 99 Caption = 'ToolBar1' Color = clWhite DisabledImages = DataLink_Company.cxImageList_bar GradientEndColor = 15717318 Images = DataLink_Company.cxImageList_bar List = True ParentColor = False ShowCaptions = True TabOrder = 4 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 ToolButton5: TToolButton Left = 284 Top = 0 AutoSize = True Caption = #38468#20214 ImageIndex = 22 OnClick = ToolButton5Click end object ToolButton2: TToolButton Left = 355 Top = 0 AutoSize = True Caption = #20445#23384#26684#24335 ImageIndex = 16 OnClick = ToolButton2Click end object TBClose: TToolButton Left = 458 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 7 OnClick = TBCloseClick end end object cxGrid1: TcxGrid [1] Left = 0 Top = 72 Width = 1366 Height = 492 Align = alClient TabOrder = 5 ExplicitLeft = -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 = <> DataController.Summary.SummaryGroups = <> OptionsBehavior.GoToNextCellOnEnter = True OptionsCustomize.ColumnFiltering = False OptionsData.Deleting = False OptionsData.DeletingConfirmation = False OptionsSelection.CellSelect = False OptionsView.GroupByBox = False object v2Column2: TcxGridDBColumn Caption = #32534#21495 DataBinding.FieldName = 'CoCode' DataBinding.IsNullValueType = True PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Width = 86 end object v2Column6: TcxGridDBColumn Caption = #20840#31216 DataBinding.FieldName = 'CoName' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Focusing = False Width = 127 end object Tv1Column1: TcxGridDBColumn Caption = #31616#31216 DataBinding.FieldName = 'CoAbbrName' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 151 end object v2Column10: TcxGridDBColumn Caption = #22320#22336 DataBinding.FieldName = 'CoAddress' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Width = 173 end object Tv1Column2: TcxGridDBColumn Caption = #33521#25991#22320#22336 DataBinding.FieldName = 'CoEAddress' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 169 end object Tv1Column3: TcxGridDBColumn Caption = #33521#25991#21517 DataBinding.FieldName = 'CoEName' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 286 end object Tv1Column4: TcxGridDBColumn Caption = #32852#31995#20154 DataBinding.FieldName = 'CompanyContact' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 135 end object Tv1Column5: TcxGridDBColumn Caption = #32852#31995#30005#35805 DataBinding.FieldName = 'CompanyTelephone' DataBinding.IsNullValueType = True HeaderAlignmentHorz = taCenter Options.Editing = False Width = 140 end end object cxGridLevel1: TcxGridLevel GridView = Tv1 end end object Panel1: TPanel [2] Left = 0 Top = 30 Width = 1366 Height = 42 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered ParentBackground = False ParentColor = True TabOrder = 2 object Label3: TLabel Left = 262 Top = 8 Width = 32 Height = 21 Caption = #20840#31216 end object Label1: TLabel Left = 22 Top = 8 Width = 32 Height = 21 Caption = #32534#21495 end object CoName: TcxTextEdit Tag = 2 Left = 298 Top = 4 ParentColor = True TabOrder = 0 Width = 200 end object CoCode: TcxTextEdit Tag = 2 Left = 58 Top = 4 ParentColor = True TabOrder = 1 Width = 200 end end object cxGrid2: TcxGrid [3] Left = 0 Top = 564 Width = 1366 Height = 267 Align = alBottom TabOrder = 3 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 inherited cxProgressBar2: TcxProgressBar ExplicitHeight = 29 end inherited ADOQueryBaseCmd: TADOQuery Connection = DataLink_Company.ADOLink Left = 337 Top = 151 end inherited ADOQueryBaseTemp: TADOQuery Connection = DataLink_Company.ADOLink Left = 201 Top = 144 end object ADOQueryTemp: TADOQuery Connection = DataLink_Company.ADOLink LockType = ltReadOnly Parameters = <> Left = 627 Top = 149 end object ADOQueryCmd: TADOQuery Connection = DataLink_Company.ADOLink Parameters = <> Left = 709 Top = 184 end object ADOQueryMain: TADOQuery Connection = DataLink_Company.ADOLink LockType = ltReadOnly Parameters = <> Left = 537 Top = 136 end object GPM_1: TcxGridPopupMenu Grid = cxGrid1 PopupMenus = <> Left = 312 Top = 295 end object DS_1: TDataSource DataSet = CDS_1 Left = 499 Top = 282 end object CDS_1: TClientDataSet Aggregates = <> Params = <> Left = 424 Top = 263 end object DS_2: TDataSource DataSet = CDS_2 Left = 459 Top = 467 end object CDS_2: TClientDataSet Aggregates = <> Params = <> Left = 384 Top = 460 end object GPM_2: TcxGridPopupMenu PopupMenus = <> Left = 320 Top = 456 end end