429 lines
10 KiB
Plaintext
429 lines
10 KiB
Plaintext
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
|