inherited frmCPManageFMSel: TfrmCPManageFMSel Left = 117 Top = 154 Caption = #20135#21697#26723#26696#36873#25321 ClientHeight = 625 ClientWidth = 1147 Color = clWhite OldCreateOrder = True Position = poScreenCenter OnClose = FormClose ExplicitWidth = 1163 ExplicitHeight = 664 PixelsPerInch = 96 TextHeight = 13 object ToolBar1: TToolBar [0] Tag = 1 Left = 0 Top = 0 Width = 1147 Height = 38 AutoSize = True ButtonHeight = 38 ButtonWidth = 75 Caption = 'ToolBar1' Color = clSkyBlue DisabledImages = DataLink_YPGL.ImageList_new32 Images = DataLink_YPGL.ImageList_new32 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 btnOK: TToolButton Left = 71 Top = 0 AutoSize = True Caption = #36873#25321 ImageIndex = 12 OnClick = btnOKClick end object TBClose: TToolButton Left = 142 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 7 OnClick = TBCloseClick end end object cxSplitter1: TcxSplitter [1] Left = 220 Top = 105 Width = 8 Height = 520 HotZoneClassName = 'TcxMediaPlayer9Style' Control = Panel5 end object Panel1: TPanel [2] Left = 0 Top = 38 Width = 1147 Height = 67 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered Color = 16242829 ParentBackground = False TabOrder = 1 object Label2: TLabel Left = 16 Top = 12 Width = 48 Height = 12 Caption = #25195#25551#20837#21475 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] ParentFont = False end object Label3: TLabel Left = 216 Top = 12 Width = 48 Height = 13 Caption = #20135#21697#32534#21495 end object Label11: TLabel Left = 1072 Top = 107 Width = 7 Height = 12 Font.Charset = GB2312_CHARSET Font.Color = clBlue Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label12: TLabel Left = 1120 Top = 111 Width = 7 Height = 12 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label4: TLabel Left = 373 Top = 12 Width = 48 Height = 13 Caption = #20135#21697#21517#31216 end object Label1: TLabel Left = 533 Top = 12 Width = 24 Height = 13 Caption = #39068#33394 end object Label6: TLabel Left = 533 Top = 40 Width = 24 Height = 13 Caption = #25104#20998 end object Label7: TLabel Left = 824 Top = 12 Width = 24 Height = 13 Caption = #22791#27880 end object Label9: TLabel Left = 373 Top = 40 Width = 36 Height = 13 Caption = #20811' '#37325 end object Label8: TLabel Left = 217 Top = 40 Width = 36 Height = 13 Caption = #38376' '#24133 end object Label5: TLabel Left = 678 Top = 12 Width = 24 Height = 13 Caption = #25209#21495 end object Label10: TLabel Left = 654 Top = 40 Width = 48 Height = 13 Caption = #32433#32455#23494#24230 end object CYID: TEdit Tag = 3 Left = 72 Top = 8 Width = 121 Height = 21 TabOrder = 0 OnKeyPress = CYIDKeyPress end object CYNO: TEdit Tag = 2 Left = 265 Top = 8 Width = 89 Height = 21 TabOrder = 1 OnChange = CYNoChange OnKeyPress = CYNOKeyPress end object CYName: TEdit Tag = 2 Left = 422 Top = 8 Width = 89 Height = 21 TabOrder = 2 OnChange = CYNoChange OnKeyPress = CYNOKeyPress end object CYColor: TEdit Tag = 2 Left = 560 Top = 8 Width = 89 Height = 21 TabOrder = 3 OnChange = CYNoChange OnKeyPress = CYNOKeyPress end object CYCF: TEdit Tag = 2 Left = 560 Top = 36 Width = 89 Height = 21 TabOrder = 4 OnChange = CYNoChange OnKeyPress = CYNOKeyPress end object ZCYNote: TEdit Tag = 2 Left = 855 Top = 8 Width = 167 Height = 21 TabOrder = 5 OnChange = CYNoChange OnKeyPress = CYNOKeyPress end object CYKZ: TEdit Tag = 2 Left = 422 Top = 36 Width = 89 Height = 21 TabOrder = 7 OnChange = CYNoChange OnKeyPress = CYNOKeyPress end object CYMF: TEdit Tag = 2 Left = 266 Top = 36 Width = 89 Height = 21 TabOrder = 6 OnChange = CYNoChange OnKeyPress = CYNOKeyPress end object XX1: TEdit Tag = 2 Left = 705 Top = 8 Width = 89 Height = 21 TabOrder = 8 OnChange = CYNoChange OnKeyPress = CYNOKeyPress end object ShaZhi: TEdit Tag = 2 Left = 705 Top = 36 Width = 89 Height = 21 TabOrder = 9 OnChange = CYNoChange OnKeyPress = CYNOKeyPress end end object Panel2: TPanel [3] Left = 512 Top = 232 Width = 185 Height = 41 BevelInner = bvRaised BevelOuter = bvLowered Caption = #27491#22312#26597#35810#25968#25454#65292#35831#31245#21518#12290#12290#12290 Color = clSkyBlue Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 5 Visible = False end object Panel5: TPanel [4] Left = 0 Top = 105 Width = 220 Height = 520 Align = alLeft BevelInner = bvRaised BevelOuter = bvLowered TabOrder = 2 object cxDBTreeList1: TcxDBTreeList Left = 2 Top = 2 Width = 216 Height = 516 Align = alClient Bands = < item end> DataController.DataSource = DataSource1 DataController.ParentField = 'CPParent' DataController.KeyField = 'CPID' Navigator.Buttons.CustomButtons = <> OptionsBehavior.CopyCaptionsToClipboard = False OptionsBehavior.ExpandOnDblClick = False OptionsSelection.CellSelect = False OptionsView.CellAutoHeight = True OptionsView.Headers = False RootValue = -1 Styles.Inactive = DataLink_YPGL.Red Styles.Selection = DataLink_YPGL.Red Styles.IncSearch = DataLink_YPGL.Red TabOrder = 0 OnDblClick = cxDBTreeList1DblClick object cxDBTreeList1cxDBTreeListColumn2: TcxDBTreeListColumn DataBinding.FieldName = 'CPName' Width = 210 Position.ColIndex = 0 Position.RowIndex = 0 Position.BandIndex = 0 Summary.FooterSummaryItems = <> Summary.GroupFooterSummaryItems = <> end end end object Panel3: TPanel [5] Left = 228 Top = 105 Width = 919 Height = 520 Align = alClient BevelInner = bvRaised BevelOuter = bvLowered Caption = 'Panel3' TabOrder = 4 object cxGrid1: TcxGrid Left = 2 Top = 32 Width = 915 Height = 291 Align = alClient PopupMenu = PopupMenu1 TabOrder = 0 object Tv1: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> Navigator.Buttons.Delete.Enabled = False Navigator.Buttons.Delete.Visible = False OnCellClick = Tv1CellClick OnCellDblClick = Tv1CellDblClick DataController.DataSource = DataSource2 DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = <> DataController.Summary.FooterSummaryItems = <> DataController.Summary.SummaryGroups = <> OptionsCustomize.ColumnFiltering = False OptionsData.Deleting = False OptionsData.DeletingConfirmation = False OptionsSelection.MultiSelect = True OptionsSelection.CheckBoxVisibility = [cbvDataRow, cbvColumnHeader] OptionsView.GroupByBox = False Styles.IncSearch = DataLink_YPGL.SHuangSe Styles.Header = DataLink_YPGL.Default Styles.Inactive = DataLink_YPGL.SHuangSe Styles.Selection = DataLink_YPGL.SHuangSe object v1Column19: TcxGridDBColumn Caption = #36873#25321 DataBinding.FieldName = 'SSel' PropertiesClassName = 'TcxCheckBoxProperties' Properties.ImmediatePost = True Properties.NullStyle = nssUnchecked Visible = False HeaderAlignmentHorz = taCenter Styles.Header = DataLink_YPGL.Default Width = 40 end object v1Column12: TcxGridDBColumn Caption = #31867#22411 DataBinding.FieldName = 'CPName' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Header = DataLink_YPGL.Default Width = 54 end object v1CYNo: TcxGridDBColumn Caption = #20135#21697#32534#21495 DataBinding.FieldName = 'CYNo' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Header = DataLink_YPGL.Default Width = 92 end object v1Column9: TcxGridDBColumn Caption = #20135#21697#21517#31216 DataBinding.FieldName = 'CYName' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 96 end object v1Column3: TcxGridDBColumn Caption = #38376#24133 DataBinding.FieldName = 'CYMF' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Header = DataLink_YPGL.Default Width = 66 end object v1Column1: TcxGridDBColumn Caption = #20811#37325 DataBinding.FieldName = 'CYKZ' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 81 end object v1Column11: TcxGridDBColumn Caption = #22270#29255 DataBinding.FieldName = 'IsImg' PropertiesClassName = 'TcxCheckBoxProperties' HeaderAlignmentHorz = taCenter Options.Editing = False Width = 57 end object Tv1Column5: TcxGridDBColumn Caption = #22635#21333#20154 DataBinding.FieldName = 'filler' HeaderAlignmentHorz = taCenter Width = 71 end object Tv1Column6: TcxGridDBColumn Caption = #20462#25913#20154 DataBinding.FieldName = 'editer' HeaderAlignmentHorz = taCenter Width = 68 end object Tv1Column7: TcxGridDBColumn Caption = #20462#25913#26102#38388 DataBinding.FieldName = 'edittime' HeaderAlignmentHorz = taCenter Width = 67 end end object cxGrid1Level1: TcxGridLevel GridView = Tv1 end end object GroupBox1: TGroupBox Left = 2 Top = 323 Width = 915 Height = 195 Align = alBottom Caption = #26679#21697#32553#30053#22270#65288#21452#20987#22270#29255#26597#30475#21407#22270#65289 TabOrder = 1 object ScrollBox1: TScrollBox Left = 2 Top = 15 Width = 911 Height = 178 Align = alClient BevelInner = bvLowered BorderStyle = bsNone TabOrder = 0 end end object Panel7: TPanel Left = 2 Top = 2 Width = 915 Height = 30 Align = alTop BevelOuter = bvNone TabOrder = 2 object Panel8: TPanel Left = 0 Top = 0 Width = 253 Height = 30 Align = alLeft BevelOuter = bvNone TabOrder = 0 object cxTabControl1: TcxTabControl Left = 0 Top = 0 Width = 253 Height = 30 Align = alClient Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -20 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 0 Visible = False Properties.CustomButtons.Buttons = <> Properties.Style = 3 Properties.TabIndex = 0 Properties.Tabs.Strings = ( #26410#23457#26680 #24050#23457#26680 #20840#37096) ClientRectBottom = 32 ClientRectRight = 253 ClientRectTop = 32 end end object Panel4: TPanel Left = 253 Top = 0 Width = 662 Height = 30 Align = alClient AutoSize = True BorderStyle = bsSingle TabOrder = 1 DesignSize = ( 658 26) object Label14: TLabel Left = 25 Top = 5 Width = 84 Height = 13 Alignment = taCenter Anchors = [akLeft, akTop, akBottom] Caption = #27599#39029#35760#24405#26465#25968 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -13 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Layout = tlCenter end object LBCPAP1: TLabel Left = 419 Top = 5 Width = 85 Height = 14 Alignment = taCenter Anchors = [akLeft, akTop, akBottom] AutoSize = False Caption = #24403#21069#39029'/'#24635#39029#25968 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Layout = tlCenter end object Button1: TButton Left = 324 Top = 1 Width = 75 Height = 22 Caption = #19978#19968#39029 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 0 OnClick = Button1Click end object Button2: TButton Left = 517 Top = 1 Width = 78 Height = 22 Caption = #19979#19968#39029 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False TabOrder = 1 OnClick = Button2Click end object TCBNOR1: TComboBox Tag = 2 Left = 117 Top = 2 Width = 78 Height = 20 Style = csDropDownList Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ItemIndex = 0 ParentFont = False TabOrder = 2 Text = '100' OnChange = TCBNOR1Change Items.Strings = ( '100' '300' '500' '1000' '5000' '10000') end end end end inherited ADOQueryBaseCmd: TADOQuery Connection = DataLink_YPGL.ADOLink Left = 105 Top = 400 end inherited ADOQueryBaseTemp: TADOQuery Connection = DataLink_YPGL.ADOLink Left = 81 Top = 321 end object DataSource1: TDataSource DataSet = ADOQueryTree Left = 91 Top = 147 end object ADOQueryTree20: TADOQuery Connection = DataLink_YPGL.ADOLink LockType = ltReadOnly Parameters = <> Left = 61 Top = 145 end object ADOQueryTemp: TADOQuery Connection = DataLink_YPGL.ADOLink LockType = ltReadOnly Parameters = <> Left = 1219 Top = 24 end object ADOQueryCmd: TADOQuery Connection = DataLink_YPGL.ADOLink Parameters = <> Left = 1261 Top = 29 end object cxGridPopupMenu1: TcxGridPopupMenu Grid = cxGrid1 PopupMenus = <> Left = 432 Top = 184 end object DataSource2: TDataSource DataSet = CDS_Main Left = 451 Top = 155 end object ADOQueryMain: TADOQuery Connection = DataLink_YPGL.ADOLink LockType = ltReadOnly Parameters = <> Left = 493 Top = 193 end object CDS_Main: TClientDataSet Aggregates = <> Params = <> Left = 392 Top = 184 end object RM1: TRMGridReport ThreadPrepareReport = True InitialZoom = pzDefault PreviewButtons = [rmpbZoom, rmpbLoad, rmpbSave, rmpbPrint, rmpbFind, rmpbPageSetup, rmpbExit, rmpbExport, rmpbNavigator] DefaultCollate = False ShowPrintDialog = 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 = 392 Top = 152 ReportData = {} end object RMDB_Main: TRMDBDataSet Visible = True DataSet = CDS_Main Left = 424 Top = 152 end object ODPat: TOpenDialog Options = [ofReadOnly, ofAllowMultiSelect, ofPathMustExist, ofFileMustExist, ofEnableSizing] Left = 484 Top = 157 end object IdFTP1: TIdFTP ConnectTimeout = 0 NATKeepAlive.UseKeepAlive = False NATKeepAlive.IdleTimeMS = 0 NATKeepAlive.IntervalMS = 0 ProxySettings.ProxyType = fpcmNone ProxySettings.Port = 0 ReadTimeout = 0 Left = 365 Top = 260 end object SaveDialog1: TSaveDialog Left = 513 Top = 157 end object DSCYNO: TDataSource DataSet = CDS_CYNO Left = 771 Top = 235 end object CDS_CYNO: TClientDataSet Aggregates = <> Params = <> Left = 712 Top = 264 end object ADOQueryTree: TClientDataSet Aggregates = <> Params = <> Left = 32 Top = 144 end object adoqueryPicture: TADOQuery Connection = DataLink_YPGL.ADOLink Parameters = <> Left = 523 Top = 192 end object OpenDialog1: TOpenDialog Left = 474 Top = 258 end object PopupMenu1: TPopupMenu Left = 548 Top = 312 object N1: TMenuItem Caption = #20840#36873 OnClick = N1Click end object N2: TMenuItem Caption = #20840#24323 OnClick = N2Click end end object RMBarCodeObject1: TRMBarCodeObject Left = 268 Top = 288 end end