object frmSYDept: TfrmSYDept Left = 73 Top = 128 Width = 1004 Height = 509 Caption = #32452#32455#32467#26500 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 = 988 Height = 33 ButtonHeight = 30 ButtonWidth = 83 Caption = 'ToolBar1' Color = clSkyBlue DisabledImages = DataLink_DDMD.ThreeImgList Flat = True Images = DataLink_DDMD.ThreeImgList List = True ParentColor = False ShowCaptions = True TabOrder = 0 object TBRafresh: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #21047#26032 ImageIndex = 0 OnClick = TBRafreshClick end object TBAdd: TToolButton Left = 63 Top = 0 AutoSize = True Caption = #26032#22686#23376#31867 ImageIndex = 12 OnClick = TBAddClick end object ToolButton1: TToolButton Left = 150 Top = 0 AutoSize = True Caption = #20445#23384 ImageIndex = 5 OnClick = ToolButton1Click end object TBDel: TToolButton Left = 213 Top = 0 AutoSize = True Caption = #21024#38500 ImageIndex = 13 OnClick = TBDelClick end object ToolButton2: TToolButton Left = 276 Top = 0 AutoSize = True Caption = #32452#32455#20998#37197 ImageIndex = 22 OnClick = ToolButton2Click end object TBClose: TToolButton Left = 363 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 21 OnClick = TBCloseClick end end object cxDBTreeList1: TcxDBTreeList Left = 0 Top = 33 Width = 249 Height = 437 Align = alLeft Bands = < item end> BufferedPaint = False DataController.DataSource = DataSource1 DataController.ParentField = 'DPParent' DataController.KeyField = 'DPID' OptionsSelection.CellSelect = False OptionsView.CellAutoHeight = True OptionsView.Headers = False RootValue = -1 Styles.Inactive = DataLink_DDMD.Red Styles.Selection = DataLink_DDMD.Red Styles.IncSearch = DataLink_DDMD.Red TabOrder = 1 OnClick = cxDBTreeList1Click OnDblClick = cxDBTreeList1DblClick object cxDBTreeList1cxDBTreeListColumn2: TcxDBTreeListColumn DataBinding.FieldName = 'DPName' Width = 210 Position.ColIndex = 1 Position.RowIndex = 0 Position.BandIndex = 0 end end object Panel1: TPanel Left = 249 Top = 33 Width = 315 Height = 437 Align = alLeft BevelInner = bvRaised BevelOuter = bvLowered Color = clSkyBlue TabOrder = 2 object Label1: TLabel Left = 41 Top = 40 Width = 48 Height = 12 Caption = #19978#32423#32452#32455 end object Label2: TLabel Left = 41 Top = 81 Width = 48 Height = 12 Caption = #32452#32455#21517#31216 end object Label3: TLabel Left = 41 Top = 121 Width = 48 Height = 12 Caption = #32452#32455#32534#30721 end object Label4: TLabel Left = 24 Top = 16 Width = 60 Height = 14 Caption = #32452#32455#32467#26500 Font.Charset = GB2312_CHARSET Font.Color = clRed Font.Height = -14 Font.Name = #23435#20307 Font.Style = [fsBold] ParentFont = False end object Label5: TLabel Left = 41 Top = 159 Width = 48 Height = 12 Caption = #39034' '#24207' '#21495 end object DPTopName: TEdit Left = 104 Top = 37 Width = 169 Height = 20 ReadOnly = True TabOrder = 0 end object DPName: TEdit Left = 104 Top = 77 Width = 169 Height = 20 TabOrder = 1 OnKeyPress = DPNameKeyPress end object DPNo: TEdit Left = 104 Top = 117 Width = 169 Height = 20 TabOrder = 2 end object DPOrder: TEdit Left = 104 Top = 155 Width = 169 Height = 20 TabOrder = 3 end end object cxGrid4: TcxGrid Left = 564 Top = 33 Width = 424 Height = 437 Align = alClient TabOrder = 3 object Tv4: TcxGridDBTableView NavigatorButtons.ConfirmDelete = False NavigatorButtons.Delete.Enabled = False NavigatorButtons.Delete.Visible = False DataController.DataSource = DSUser DataController.Options = [dcoAssignGroupingValues, dcoAssignMasterDetailKeys, dcoSaveExpanding, dcoImmediatePost] DataController.Summary.DefaultGroupSummaryItems = <> DataController.Summary.FooterSummaryItems = <> DataController.Summary.SummaryGroups = <> OptionsCustomize.ColumnFiltering = False OptionsData.Deleting = False OptionsData.DeletingConfirmation = False OptionsView.GroupByBox = False Styles.Inactive = DataLink_DDMD.SHuangSe Styles.IncSearch = DataLink_DDMD.SHuangSe Styles.Selection = DataLink_DDMD.SHuangSe object cxGridDBColumn1: TcxGridDBColumn Caption = #21592#24037#32534#21495 DataBinding.FieldName = 'UserId' PropertiesClassName = 'TcxTextEditProperties' Properties.Alignment.Horz = taCenter Properties.Alignment.Vert = taVCenter HeaderAlignmentHorz = taCenter Options.Focusing = False Styles.Header = DataLink_DDMD.Default Width = 84 end object cxGridDBColumn7: TcxGridDBColumn Caption = #30331#24405#21517#31216 DataBinding.FieldName = 'UserName' PropertiesClassName = 'TcxTextEditProperties' Properties.Alignment.Horz = taCenter Properties.Alignment.Vert = taVCenter HeaderAlignmentHorz = taCenter Options.Focusing = False Styles.Header = DataLink_DDMD.Default Width = 87 end object cxGridDBColumn8: TcxGridDBColumn Caption = #21592#24037#32452#32455 DataBinding.FieldName = 'dept' PropertiesClassName = 'TcxTextEditProperties' Properties.Alignment.Horz = taCenter Properties.Alignment.Vert = taVCenter HeaderAlignmentHorz = taCenter Options.Focusing = False Styles.Header = DataLink_DDMD.Default Width = 74 end object v4Column1: TcxGridDBColumn Caption = #31995#32479#21517#31216 DataBinding.FieldName = 'MoneyUserName' PropertiesClassName = 'TcxTextEditProperties' Properties.Alignment.Horz = taCenter Properties.Alignment.Vert = taVCenter Properties.OnEditValueChanged = v4Column1PropertiesEditValueChanged HeaderAlignmentHorz = taCenter Styles.Header = DataLink_DDMD.Default Width = 91 end end object cxGridLevel2: TcxGridLevel GridView = Tv4 end end object DataSource1: TDataSource DataSet = CDS_Tree Left = 147 Top = 219 end object ADOQueryTree: TADOQuery Connection = DataLink_DDMD.ADOLink LockType = ltReadOnly Parameters = <> Left = 117 Top = 145 end object ADOQueryTemp: TADOQuery Connection = DataLink_DDMD.ADOLink LockType = ltReadOnly Parameters = <> Left = 528 Top = 215 end object ADOQueryCmd: TADOQuery Connection = DataLink_DDMD.ADOLink Parameters = <> Left = 520 Top = 258 end object CDS_Tree: TClientDataSet Aggregates = <> Params = <> Left = 96 Top = 256 end object CDS_User: TClientDataSet Aggregates = <> Params = <> Left = 680 Top = 272 end object DSUser: TDataSource DataSet = CDS_User Left = 675 Top = 211 end end