object frmUserList: TfrmUserList Left = 413 Top = 338 Width = 1053 Height = 602 Caption = #21592#24037#32500#25252 Color = clBtnFace Font.Charset = GB2312_CHARSET Font.Color = clWindowText Font.Height = -12 Font.Name = #23435#20307 Font.Style = [] OldCreateOrder = False OnClose = FormClose OnCreate = FormCreate OnDestroy = FormDestroy OnShow = FormShow PixelsPerInch = 96 TextHeight = 12 object ToolBar1: TToolBar Left = 0 Top = 0 Width = 1037 AutoSize = True ButtonHeight = 30 ButtonWidth = 89 Caption = 'ToolBar1' Color = clSkyBlue Flat = True Images = BaseData10_DataLink.ThreeImgList List = True ParentColor = False ShowCaptions = True TabOrder = 0 object ToolButton1: TToolButton Left = 0 Top = 0 AutoSize = True Caption = #21047#26032 ImageIndex = 2 OnClick = ToolButton1Click end object tbyhadd: TToolButton Left = 63 Top = 0 AutoSize = True Caption = #26032#22686 ImageIndex = 3 OnClick = tbyhaddClick end object tbyhup: TToolButton Left = 126 Top = 0 AutoSize = True Caption = #20462#25913 ImageIndex = 54 OnClick = tbyhupClick end object tbyhdelete: TToolButton Left = 189 Top = 0 AutoSize = True Caption = #21024#38500 ImageIndex = 17 OnClick = tbyhdeleteClick end object tbqx: TToolButton Left = 252 Top = 0 AutoSize = True Caption = #23548#20986'Excel' ImageIndex = 75 OnClick = tbqxClick end object ToolButton2: TToolButton Left = 345 Top = 0 AutoSize = True Caption = #25171#21360 ImageIndex = 12 OnClick = ToolButton2Click end object tbclose: TToolButton Left = 408 Top = 0 AutoSize = True Caption = #20851#38381 ImageIndex = 55 OnClick = tbcloseClick end end object cxGrid1: TcxGrid Left = 0 Top = 97 Width = 1037 Height = 385 Align = alTop TabOrder = 1 object tv1: TcxGridDBTableView Navigator.Buttons.CustomButtons = <> OnCellDblClick = tv1CellDblClick DataController.DataSource = DataSource2 DataController.Summary.DefaultGroupSummaryItems = <> DataController.Summary.FooterSummaryItems = < item Format = #20849' 0 '#26465 Kind = skCount Column = tv1Name1 end> DataController.Summary.SummaryGroups = <> OptionsBehavior.FocusCellOnTab = True OptionsCustomize.ColumnFiltering = False OptionsData.Editing = False OptionsSelection.CellSelect = False OptionsSelection.HideSelection = True OptionsView.Footer = True OptionsView.GroupByBox = False OptionsView.Indicator = True Styles.ContentOdd = BaseData10_DataLink.cxStyle_gridRow Styles.Footer = BaseData10_DataLink.cxStyle_gridFoot Styles.GroupByBox = BaseData10_DataLink.cxStyle_gridGroupBox Styles.Header = BaseData10_DataLink.cxStyle_gridHead object tv1Code1: TcxGridDBColumn Caption = #32534#21495 DataBinding.FieldName = 'userid' PropertiesClassName = 'TcxTextEditProperties' Properties.Alignment.Horz = taLeftJustify Properties.ReadOnly = True HeaderAlignmentHorz = taCenter Width = 75 end object tv1Name1: TcxGridDBColumn Caption = #21517#31216 DataBinding.FieldName = 'userName' PropertiesClassName = 'TcxTextEditProperties' Properties.Alignment.Horz = taLeftJustify Properties.ReadOnly = True HeaderAlignmentHorz = taCenter Width = 84 end object tv1edu: TcxGridDBColumn Caption = #23398#21382 DataBinding.FieldName = 'edu' HeaderAlignmentHorz = taCenter Width = 60 end object tv1Sex1: TcxGridDBColumn Caption = #24615#21035 DataBinding.FieldName = 'Sex' PropertiesClassName = 'TcxTextEditProperties' Properties.Alignment.Horz = taLeftJustify Properties.ReadOnly = True HeaderAlignmentHorz = taCenter end object tv1Phone1: TcxGridDBColumn Caption = #32852#31995#30005#35805 DataBinding.FieldName = 'Phone' PropertiesClassName = 'TcxTextEditProperties' Properties.Alignment.Horz = taLeftJustify Properties.ReadOnly = True HeaderAlignmentHorz = taCenter Width = 68 end object tv1IdNo1: TcxGridDBColumn Caption = #36523#20221#35777#21495 DataBinding.FieldName = 'IdNo' PropertiesClassName = 'TcxTextEditProperties' HeaderAlignmentHorz = taCenter Width = 81 end object tv1Dept1: TcxGridDBColumn Caption = #25152#23646#37096#38376 DataBinding.FieldName = 'UDept' PropertiesClassName = 'TcxTextEditProperties' Properties.Alignment.Horz = taLeftJustify Properties.ReadOnly = True HeaderAlignmentHorz = taCenter Width = 71 end object tv1position: TcxGridDBColumn Caption = #24037#31181 DataBinding.FieldName = 'position' HeaderAlignmentHorz = taCenter Width = 60 end object tv1InTime: TcxGridDBColumn Caption = #24405#29992#26085#26399 DataBinding.FieldName = 'InTime' HeaderAlignmentHorz = taCenter Width = 71 end object tv1fstr1: TcxGridDBColumn Caption = #30331#35760#21495 DataBinding.FieldName = 'fstr1' HeaderAlignmentHorz = taCenter Width = 60 end object tv1Address: TcxGridDBColumn Caption = #23478#24237#22320#22336 DataBinding.FieldName = 'Address' HeaderAlignmentHorz = taCenter Width = 120 end object tv1Valid1: TcxGridDBColumn Caption = #26159#21542#22312#32844 DataBinding.FieldName = 'ValidName' PropertiesClassName = 'TcxTextEditProperties' Properties.Alignment.Horz = taLeftJustify Properties.ReadOnly = True HeaderAlignmentHorz = taCenter end object tv1Column1: TcxGridDBColumn Caption = #26159#21542#30331#35760#20135#37327 DataBinding.FieldName = 'fstr2' HeaderAlignmentHorz = taCenter Width = 86 end object tv1note: TcxGridDBColumn Caption = #22791#27880 DataBinding.FieldName = 'note' HeaderAlignmentHorz = taCenter Width = 120 end end object cxGrid1Level1: TcxGridLevel GridView = tv1 end end object Panel1: TPanel Left = 0 Top = 32 Width = 1037 Height = 65 Align = alTop BevelInner = bvRaised BevelOuter = bvLowered Color = clSkyBlue TabOrder = 2 object Label1: TLabel Left = 36 Top = 16 Width = 48 Height = 12 Caption = #32534' '#21495 end object Label2: TLabel Left = 36 Top = 40 Width = 48 Height = 12 Caption = #21517' '#31216 end object Label7: TLabel Left = 272 Top = 16 Width = 48 Height = 12 Caption = #24615' '#21035 end object Label8: TLabel Left = 272 Top = 40 Width = 48 Height = 12 Caption = #23398' '#21382 end object Label3: TLabel Left = 508 Top = 16 Width = 48 Height = 12 Caption = #26159#21542#22312#32844 end object Label4: TLabel Left = 508 Top = 40 Width = 48 Height = 12 Caption = #24037' '#31181 end object Label5: TLabel Left = 732 Top = 16 Width = 48 Height = 12 Caption = #30331' '#35760' '#21495 end object userID: TEdit Tag = 2 Left = 88 Top = 12 Width = 100 Height = 20 TabOrder = 0 OnChange = userIDChange end object USERName: TEdit Tag = 2 Left = 88 Top = 36 Width = 100 Height = 20 TabOrder = 1 OnChange = userIDChange end object sex: TComboBox Tag = 2 Left = 328 Top = 12 Width = 100 Height = 20 Style = csDropDownList ItemHeight = 12 ItemIndex = 0 TabOrder = 2 OnChange = userIDChange Items.Strings = ( '' #30007 #22899) end object edu: TComboBox Tag = 2 Left = 328 Top = 36 Width = 100 Height = 20 Style = csDropDownList ItemHeight = 12 ItemIndex = 0 TabOrder = 3 OnChange = userIDChange Items.Strings = ( '' #23567#23398 #20013#23398 #39640#20013 #20013#19987 #22823#19987 #26412#31185 #30805#22763 #21338#22763) end object validName: TComboBox Tag = 2 Left = 564 Top = 12 Width = 100 Height = 20 Style = csDropDownList ItemHeight = 12 ItemIndex = 0 TabOrder = 4 OnChange = userIDChange Items.Strings = ( '' #26159 #21542) end object position: TEdit Tag = 2 Left = 564 Top = 36 Width = 100 Height = 20 TabOrder = 5 OnChange = userIDChange end object fstr1: TEdit Tag = 2 Left = 788 Top = 12 Width = 100 Height = 20 TabOrder = 6 OnChange = userIDChange end end object ADO_user: TADOQuery Connection = BaseData10_DataLink.ADOLink Parameters = <> Left = 104 Top = 100 end object ADO_Cmd: TADOQuery Connection = BaseData10_DataLink.ADOLink Parameters = <> Left = 332 Top = 104 end object DataSource2: TDataSource DataSet = CDS_User Left = 148 Top = 144 end object CDS_User: TClientDataSet Aggregates = <> Params = <> Left = 160 Top = 100 end object RMDBMain: TRMDBDataSet Visible = True DataSet = CDS_User Left = 392 Top = 200 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 = RMDBMain CompressLevel = rmzcFastest CompressThread = False LaterBuildEvents = True OnlyOwnerDataSet = False Left = 336 Top = 200 ReportData = {} end end