user_m.dfm

DELPHI计算机科学系教务管理系统,带论文设计,不错的参考

    object lbEmail: TLabel
      Left = 323
      Top = 145
      Width = 64
      Height = 14
      AutoSize = False
      Caption = #32852#31995#37038#31665#65306
    end
    object edName2: TEdit
      Left = 52
      Top = 18
      Width = 105
      Height = 21
      TabOrder = 0
      OnKeyPress = edName2KeyPress
    end
    object cbPost: TComboBox
      Left = 244
      Top = 18
      Width = 105
      Height = 21
      ItemHeight = 13
      TabOrder = 1
      OnChange = cbPostChange
    end
    object fcTreeView: TfcTreeView
      Left = 552
      Top = 19
      Width = 161
      Height = 145
      BorderStyle = bsNone
      Indent = 19
      Items.StreamVersion = 1
      Items.Data = {00000000}
      TabOrder = 2
    end
    object edPwd1: TEdit
      Left = 51
      Top = 58
      Width = 105
      Height = 21
      PasswordChar = '*'
      TabOrder = 3
      OnKeyPress = edPwd1KeyPress
    end
    object edPwd2: TEdit
      Left = 243
      Top = 58
      Width = 105
      Height = 21
      PasswordChar = '*'
      TabOrder = 4
      OnKeyPress = edPwd2KeyPress
    end
    object dateDTP: TDateTimePicker
      Left = 435
      Top = 58
      Width = 106
      Height = 21
      Date = 39168.909948819450000000
      Time = 39168.909948819450000000
      TabOrder = 5
      OnChange = dateDTPChange
      OnKeyPress = dateDTPKeyPress
    end
    object edAdress: TEdit
      Left = 74
      Top = 103
      Width = 242
      Height = 21
      TabOrder = 6
      OnKeyPress = edAdressKeyPress
    end
    object Edit8: TEdit
      Left = 75
      Top = 142
      Width = 242
      Height = 21
      TabOrder = 7
      OnKeyPress = Edit8KeyPress
    end
    object Edit9: TEdit
      Left = 387
      Top = 103
      Width = 153
      Height = 21
      TabOrder = 8
      OnKeyPress = Edit9KeyPress
    end
    object Edit10: TEdit
      Left = 388
      Top = 142
      Width = 153
      Height = 21
      TabOrder = 9
      OnKeyPress = Edit10KeyPress
    end
    object cbSex2: TComboBox
      Left = 436
      Top = 18
      Width = 106
      Height = 21
      ItemHeight = 13
      TabOrder = 10
      OnChange = cbSex2Change
    end
  end
  object Panel4: TPanel
    Left = 0
    Top = 418
    Width = 716
    Height = 44
    Align = alBottom
    BorderStyle = bsSingle
    Color = clMoneyGreen
    TabOrder = 3
    object BitBtn2: TBitBtn
      Left = 141
      Top = 7
      Width = 65
      Height = 25
      Caption = #22686#21152
      TabOrder = 0
      OnClick = BitBtn2Click
      Glyph.Data = {
        E6000000424DE60000000000000076000000280000000F0000000E0000000100
        04000000000070000000130B0000130B00001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
        8880888888888888888088888888888888808888880008888880888888070888
        8880888888070888888088800007000088808880777777708880888000070000
        8880888888070888888088888807088888808888880008888880888888888888
        88808888888888888880}
    end
    object BitBtn3: TBitBtn
      Left = 205
      Top = 7
      Width = 65
      Height = 25
      Caption = #21024#38500
      TabOrder = 1
      OnClick = BitBtn3Click
      Glyph.Data = {
        DE000000424DDE0000000000000076000000280000000D0000000D0000000100
        0400000000006800000000000000000000001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00FFFFFFFFFFFF
        F000FFFFFFFFFFFFF000FFFFFFFFFFFFF000FFFFFFFFFFFFF000FFFFFFFFFFFF
        F000FF000000000FF000FF0FFFFFFF0FF000FF000000000FF000FFFFFFFFFFFF
        F000FFFFFFFFFFFFF000FFFFFFFFFFFFF000FFFFFFFFFFFFF000FFFFFFFFFFFF
        F000}
    end
    object BitBtn4: TBitBtn
      Left = 269
      Top = 7
      Width = 65
      Height = 25
      Caption = #20462#25913
      TabOrder = 2
      OnClick = BitBtn4Click
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000
        000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F
        00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF
        F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B
        0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F
        FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF
        FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F
        0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF
        00333377737FFFFF773333303300000003333337337777777333}
      NumGlyphs = 2
    end
    object BitBtn5: TBitBtn
      Left = 333
      Top = 7
      Width = 65
      Height = 25
      Caption = #21462#28040
      TabOrder = 3
      OnClick = BitBtn5Click
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
        3333333777333777FF3333993333339993333377FF3333377FF3399993333339
        993337777FF3333377F3393999333333993337F777FF333337FF993399933333
        399377F3777FF333377F993339993333399377F33777FF33377F993333999333
        399377F333777FF3377F993333399933399377F3333777FF377F993333339993
        399377FF3333777FF7733993333339993933373FF3333777F7F3399933333399
        99333773FF3333777733339993333339933333773FFFFFF77333333999999999
        3333333777333777333333333999993333333333377777333333}
      NumGlyphs = 2
    end
    object BitBtn6: TBitBtn
      Left = 397
      Top = 7
      Width = 65
      Height = 25
      Caption = #20445#23384
      TabOrder = 4
      OnClick = BitBtn6Click
      Glyph.Data = {
        F6000000424DF600000000000000760000002800000010000000100000000100
        0400000000008000000000000000000000001000000000000000000000000000
        8000008000000080800080000000800080008080000080808000C0C0C0000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00888888888888
        8888880000000000000880330000008803088033000000880308803300000088
        0308803300000000030880333333333333088033000000003308803088888888
        0308803088888888030880308888888803088030888888880308803088888888
        0008803088888888080880000000000000088888888888888888}
    end
    object BitBtn7: TBitBtn
      Left = 461
      Top = 7
      Width = 65
      Height = 25
      Caption = #36864#20986
      TabOrder = 5
      OnClick = BitBtn7Click
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
        33333337777FF377FF3333993370739993333377FF373F377FF3399993000339
        993337777F777F3377F3393999707333993337F77737333337FF993399933333
        399377F3777FF333377F993339903333399377F33737FF33377F993333707333
        399377F333377FF3377F993333101933399377F333777FFF377F993333000993
        399377FF3377737FF7733993330009993933373FF3777377F7F3399933000399
        99333773FF777F777733339993707339933333773FF7FFF77333333999999999
        3333333777333777333333333999993333333333377777333333}
      NumGlyphs = 2
    end
  end
  object StatusBar1: TStatusBar
    Left = 0
    Top = 462
    Width = 716
    Height = 24
    Panels = <
      item
        Width = 250
      end
      item
        Width = 200
      end
      item
        Width = 50
      end>
  end
  object dsUser: TDataSource
    DataSet = adoqUser
    Left = 128
    Top = 121
  end
  object adoqUser: TADOQuery
    Connection = DM.ADOConnection1
    CursorType = ctStatic
    AfterScroll = adoqUserAfterScroll
    Parameters = <>
    SQL.Strings = (
      'select distinct A.*,B.Dname as Sex,C.Dname as Post'
      'from TUser A'
      'left join TDataParam B on A.Usex=B.Did'
      'left join TDataParam C on A.Upost=C.Did')
    Left = 200
    Top = 145
  end
end