object frmZdyYS_help: TfrmZdyYS_help Left = 794 Top = 277 Width = 813 Height = 662 Caption = #39068#33394 Color = clBtnFace Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] OldCreateOrder = False OnClose = FormClose OnDestroy = FormDestroy OnShow = FormShow PixelsPerInch = 96 TextHeight = 12 object Panel1: TPanel Left = 0 Top = 0 Width = 797 Height = 623 Align = alClient Caption = 'Panel1' TabOrder = 0 end object PageControl1: TPageControl Left = 0 Top = 0 Width = 797 Height = 623 ActivePage = TabSheet1 Align = alClient Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -16 Font.Name = #23435#20307 Font.Style = [] ParentFont = False TabOrder = 1 OnChange = PageControl1Change object TabSheet1: TTabSheet Caption = #34920#26684#26174#31034 object cxGrid2: TcxGrid Left = 0 Top = 31 Width = 789 Height = 561 Align = alClient TabOrder = 0 object Tv2: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> Navigator.Buttons.Delete.Enabled = False Navigator.Buttons.Delete.Visible = False OnFocusedRecordChanged = Tv2FocusedRecordChanged DataController.DataSource = DS_HZ 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 OptionsCustomize.ColumnSorting = False OptionsView.GroupByBox = False OptionsView.Indicator = True Styles.Inactive = DataLink_BaseInfo.SHuangSe Styles.IncSearch = DataLink_BaseInfo.SHuangSe Styles.Selection = DataLink_BaseInfo.SHuangSe Styles.Header = DataLink_BaseInfo.handBlack object Tv2Column1: TcxGridDBColumn OnGetDisplayText = Tv2Column1GetDisplayText MinWidth = 30 Options.HorzSizing = False Width = 30 end object v2Column2: TcxGridDBColumn Caption = #39068#33394#20195#21495 DataBinding.FieldName = 'Code' PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Options.Editing = False Options.Focusing = False Width = 80 end object v2Column6: TcxGridDBColumn Caption = #39068#33394#21517#31216 DataBinding.FieldName = 'CodeName' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = v2Column6PropertiesEditValueChanged HeaderAlignmentHorz = taCenter Width = 200 end object Tv2Column2: TcxGridDBColumn Caption = #39068#33394#21517#31216#33521#25991 DataBinding.FieldName = 'CodeNameYW' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = Tv2Column2PropertiesEditValueChanged HeaderAlignmentHorz = taCenter Width = 100 end object v2Column14: TcxGridDBColumn Caption = #22791#27880 DataBinding.FieldName = 'Note' PropertiesClassName = 'TcxTextEditProperties' Properties.OnEditValueChanged = v2Column6PropertiesEditValueChanged HeaderAlignmentHorz = taCenter Width = 147 end end object cxGridLevel1: TcxGridLevel GridView = Tv2 end end object ToolBar1: TToolBar Left = 0 Top = 0 Width = 789 Height = 31 ButtonHeight = 30 ButtonWidth = 67 Caption = 'ToolBar1' Color = clSkyBlue DisabledImages = DataLink_BaseInfo.ThreeImgList Flat = True Images = DataLink_BaseInfo.ThreeImgList List = True ParentColor = False ShowCaptions = True TabOrder = 1 object TBRafresh: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #21047#26032 ImageIndex = 9 Visible = False OnClick = TBRafreshClick end object ToolButton1: TToolButton Left = 71 Top = 0 AutoSize = True Caption = #26032#22686 ImageIndex = 10 OnClick = ToolButton1Click end object ToolButton2: TToolButton Left = 142 Top = 0 AutoSize = True Caption = #21024#38500 ImageIndex = 100 OnClick = ToolButton2Click end object TBClose: TToolButton Left = 213 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 55 OnClick = TBCloseClick end end end object TabSheet2: TTabSheet Caption = #26641#24418#26174#31034 ImageIndex = 1 object Panel2: TPanel Left = 270 Top = 54 Width = 315 Height = 171 BevelInner = bvRaised BevelOuter = bvLowered Color = clSkyBlue TabOrder = 0 object Label1: TLabel Left = 66 Top = 24 Width = 64 Height = 16 Caption = #29238' '#31867 end object Label2: TLabel Left = 66 Top = 65 Width = 64 Height = 16 Caption = #31867#21035#21517#31216 end object Label3: TLabel Left = 66 Top = 132 Width = 64 Height = 16 Caption = #31867#21035#32534#30721 end object Label4: TLabel Left = 36 Top = 99 Width = 96 Height = 16 Caption = #39068#33394#33521#25991#21517#31216 end object CPTopName: TEdit Left = 133 Top = 21 Width = 121 Height = 24 ReadOnly = True TabOrder = 0 end object CPName: TEdit Left = 133 Top = 61 Width = 121 Height = 24 TabOrder = 1 end object CPNo: TEdit Left = 133 Top = 128 Width = 121 Height = 24 TabOrder = 2 end object CPNameYW: TEdit Left = 134 Top = 95 Width = 121 Height = 24 TabOrder = 3 end end object ToolBar2: TToolBar Left = 0 Top = 0 Width = 789 Height = 33 ButtonHeight = 30 ButtonWidth = 99 Caption = 'ToolBar1' Color = clSkyBlue DisabledImages = DataLink_BaseInfo.ThreeImgList Flat = True Images = DataLink_BaseInfo.ThreeImgList List = True ParentColor = False ShowCaptions = True TabOrder = 1 object ToolButton3: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #21047#26032 ImageIndex = 9 OnClick = ToolButton3Click end object TBAdd: TToolButton Left = 71 Top = 0 AutoSize = True Caption = #26032#22686#23376#31867 ImageIndex = 3 OnClick = TBAddClick end object ToolButton4: TToolButton Left = 174 Top = 0 AutoSize = True Caption = #20445#23384 ImageIndex = 14 OnClick = ToolButton4Click end object TBDel: TToolButton Left = 245 Top = 0 AutoSize = True Caption = #21024#38500 ImageIndex = 17 OnClick = TBDelClick end object ToolButton5: TToolButton Left = 316 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 55 OnClick = TBCloseClick end end object cxDBTreeList1: TcxDBTreeList Left = 0 Top = 33 Width = 249 Height = 559 Align = alLeft Bands = < item end> DataController.DataSource = DataSource1 DataController.ParentField = 'CPParent' DataController.KeyField = 'Mainid' Navigator.Buttons.CustomButtons = <> OptionsBehavior.ExpandOnDblClick = False OptionsSelection.CellSelect = False OptionsView.CellAutoHeight = True OptionsView.Headers = False RootValue = -1 TabOrder = 2 OnClick = cxDBTreeList1Change object cxDBTreeList1cxDBTreeListColumn2: TcxDBTreeListColumn DataBinding.FieldName = 'CodeName' Width = 210 Position.ColIndex = 0 Position.RowIndex = 0 Position.BandIndex = 0 Summary.FooterSummaryItems = <> Summary.GroupFooterSummaryItems = <> end end end end object ADOQueryTemp: TADOQuery Connection = DataLink_BaseInfo.ADOLink LockType = ltReadOnly Parameters = <> Left = 357 Top = 73 end object ADOQueryCmd: TADOQuery Connection = DataLink_BaseInfo.ADOLink Parameters = <> Left = 385 Top = 233 end object ADOQueryMain: TADOQuery Connection = DataLink_BaseInfo.ADOLink LockType = ltReadOnly Parameters = <> Left = 125 Top = 169 end object RM1: TRMGridReport ThreadPrepareReport = True InitialZoom = pzDefault PreviewButtons = [pbZoom, pbLoad, pbSave, pbPrint, pbFind, pbPageSetup, pbExit, pbExport, pbNavigator] DefaultCollate = False SaveReportOptions.RegistryPath = 'Software\ReportMachine\ReportSettings\' PreviewOptions.RulerUnit = rmutScreenPixels PreviewOptions.RulerVisible = False PreviewOptions.DrawBorder = False PreviewOptions.BorderPen.Color = clGray PreviewOptions.BorderPen.Style = psDash Dataset = RMDB_Main CompressLevel = rmzcFastest CompressThread = False LaterBuildEvents = True OnlyOwnerDataSet = False Left = 300 Top = 228 ReportData = {} end object RMDB_Main: TRMDBDataSet Visible = True Left = 160 Top = 176 end object cxGridPopupMenu2: TcxGridPopupMenu PopupMenus = <> Left = 340 Top = 232 end object DS_HZ: TDataSource DataSet = CDS_HZ Left = 247 Top = 171 end object CDS_HZ: TClientDataSet Aggregates = <> Params = <> Left = 204 Top = 172 end object DSsub: TDataSource DataSet = CDSsub Left = 512 Top = 272 end object CDSsub: TClientDataSet Aggregates = <> Params = <> Left = 540 Top = 268 end object ADOQuerysub: TADOQuery Connection = DataLink_BaseInfo.ADOLink Parameters = <> Left = 484 Top = 276 end object ADOQueryTree: TADOQuery Connection = DataLink_BaseInfo.ADOLink LockType = ltReadOnly Parameters = <> Left = 277 Top = 289 end object DataSource1: TDataSource DataSet = ADOQueryTree Left = 343 Top = 287 end end