object frmMJEdit: TfrmMJEdit Left = 476 Top = 194 Width = 717 Height = 500 Caption = #24037#24207#35774#32622 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 ToolBar1: TToolBar Left = 0 Top = 0 Width = 701 Height = 30 ButtonHeight = 30 ButtonWidth = 59 Caption = 'ToolBar1' Color = clSkyBlue EdgeInner = esNone EdgeOuter = esNone Flat = True Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] Images = DataLink_TradeManage.ThreeImgList List = True ParentColor = False ParentFont = False ShowCaptions = True TabOrder = 0 object ToolButton2: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #21047#26032 ImageIndex = 9 OnClick = ToolButton2Click end object ToolButton1: TToolButton Left = 63 Top = 0 AutoSize = True Caption = #30830#35748 ImageIndex = 10 OnClick = ToolButton1Click end object TBClose: TToolButton Left = 126 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 21 OnClick = TBCloseClick end end object Panel1: TPanel Left = 0 Top = 30 Width = 701 Height = 63 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered Color = clSkyBlue TabOrder = 1 object Label2: TLabel Left = 33 Top = 48 Width = 7 Height = 12 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False Visible = False end object Label13: TLabel Left = 16 Top = 26 Width = 54 Height = 12 Caption = #32534' '#21495 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label5: TLabel Left = 169 Top = 26 Width = 54 Height = 12 Caption = #21517' '#31216 Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object UserID: TEdit Tag = 2 Left = 72 Top = 22 Width = 80 Height = 20 TabOrder = 0 OnChange = UserIDChange end object UserName: TEdit Tag = 2 Left = 224 Top = 22 Width = 80 Height = 20 TabOrder = 1 OnChange = UserIDChange end end object cxGrid4: TcxGrid Left = 174 Top = 93 Width = 527 Height = 369 Align = alClient TabOrder = 2 object TV3: TcxGridDBTableView NavigatorButtons.ConfirmDelete = False OnCellClick = TV3CellClick DataController.DataSource = DS_Glide DataController.Summary.DefaultGroupSummaryItems = <> DataController.Summary.FooterSummaryItems = <> DataController.Summary.SummaryGroups = <> OptionsCustomize.ColumnFiltering = False OptionsCustomize.ColumnSorting = False OptionsData.Deleting = False OptionsView.GroupByBox = False OptionsView.Indicator = True object cxGridDBColumn2: TcxGridDBColumn Caption = #21517#31216 DataBinding.FieldName = 'YGName' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Header = cxStyle1 Width = 89 end object cxGridDBColumn1: TcxGridDBColumn Caption = #37096#38376 DataBinding.FieldName = 'Dept' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Header = cxStyle1 Width = 73 end object V3Column1: TcxGridDBColumn Caption = #31867#21035 DataBinding.FieldName = 'YGType' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Header = cxStyle1 end object V3Column2: TcxGridDBColumn Caption = #23703#20301 DataBinding.FieldName = 'GangWei' HeaderAlignmentHorz = taCenter Options.Editing = False Styles.Header = cxStyle1 end end object cxGridLevel3: TcxGridLevel GridView = TV3 end end object cxDBTreeList1: TcxDBTreeList Left = 0 Top = 93 Width = 174 Height = 369 Align = alLeft Bands = < item end> BufferedPaint = False DataController.DataSource = DataSource2 DataController.ParentField = 'DPParent' DataController.KeyField = 'DPID' OptionsBehavior.ExpandOnDblClick = False OptionsSelection.CellSelect = False OptionsView.CellAutoHeight = True OptionsView.Headers = False RootValue = -1 Styles.Inactive = DataLink_TradeManage.Red Styles.Selection = DataLink_TradeManage.Red Styles.IncSearch = DataLink_TradeManage.Red TabOrder = 3 OnDblClick = cxDBTreeList1DblClick object cxDBTreeList1cxDBTreeListColumn2: TcxDBTreeListColumn DataBinding.FieldName = 'DPName' Width = 210 Position.ColIndex = 1 Position.RowIndex = 0 Position.BandIndex = 0 end end object ADOTmp: TADOQuery Connection = DataLink_TradeManage.ADOLink LockType = ltReadOnly Parameters = <> Left = 832 Top = 72 end object ADOQueryMain: TADOQuery Connection = DataLink_TradeManage.ADOLink LockType = ltReadOnly Parameters = <> Left = 340 Top = 196 end object ADOCmd: TADOQuery Connection = DataLink_TradeManage.ADOLink Parameters = <> Left = 832 Top = 40 end object DS_Glide: TDataSource DataSet = CDS_Glide Left = 456 Top = 200 end object CDS_Glide: TClientDataSet Aggregates = <> Params = <> Left = 384 Top = 196 end object ADOQueryTree: TADOQuery Connection = DataLink_TradeManage.ADOLink LockType = ltReadOnly Parameters = <> Left = 48 Top = 153 end object CDS_Tree: TClientDataSet Aggregates = <> Params = <> Left = 58 Top = 213 end object DataSource2: TDataSource DataSet = CDS_Tree Left = 109 Top = 210 end object ADOQueryTemp: TADOQuery Connection = DataLink_TradeManage.ADOLink LockType = ltReadOnly Parameters = <> Left = 248 Top = 147 end object ADOQueryCmd: TADOQuery Connection = DataLink_TradeManage.ADOLink Parameters = <> Left = 430 Top = 149 end object cxStyleRepository1: TcxStyleRepository object cxStyle1: TcxStyle AssignedValues = [svFont] Font.Charset = DEFAULT_CHARSET Font.Color = clWindowText Font.Height = -11 Font.Name = 'MS Sans Serif' Font.Style = [fsBold] end end end