classmanageunit.dfm

是一个Delphi的教材管理系统,内容很全面详细

object frmClassManage: TfrmClassManage
  Left = 200
  Top = 141
  BorderStyle = bsSingle
  Caption = #29677#32423#31649#29702
  ClientHeight = 339
  ClientWidth = 542
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  Position = poDesktopCenter
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object DBGrid1: TDBGrid
    Left = 8
    Top = 8
    Width = 521
    Height = 137
    DataSource = DataSource1
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
    ReadOnly = True
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    OnColEnter = DBGrid1ColEnter
    Columns = <
      item
        Color = cl3DLight
        Expanded = False
        FieldName = 'ClassName'
        Title.Alignment = taCenter
        Title.Caption = #29677#32423#21517#31216
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'enterDate'
        Title.Alignment = taCenter
        Title.Caption = #20837#23398#26085#26399
        Width = 50
        Visible = True
      end
      item
        Color = cl3DLight
        Expanded = False
        FieldName = 'department'
        Title.Alignment = taCenter
        Title.Caption = #25152#22312#38498#31995
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'specialization'
        Title.Alignment = taCenter
        Title.Caption = #25152#23398#19987#19994
        Visible = True
      end
      item
        Color = cl3DLight
        Expanded = False
        FieldName = 'strength'
        Title.Alignment = taCenter
        Title.Caption = #29677#32423#20154#25968
        Width = 52
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'mornitor'
        Title.Alignment = taCenter
        Title.Caption = #29677#38271#22995#21517
        Width = 52
        Visible = True
      end
      item
        Color = cl3DLight
        Expanded = False
        FieldName = 'mornitorPhone'
        Title.Alignment = taCenter
        Title.Caption = #29677#38271#30005#35805
        Width = 52
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'master'
        Title.Alignment = taCenter
        Title.Caption = #29677#20027#20219#22995#21517
        Width = 60
        Visible = True
      end
      item
        Color = cl3DLight
        Expanded = False
        FieldName = 'masterPhone'
        Title.Alignment = taCenter
        Title.Caption = #29677#20027#20219#30005#35805
        Width = 60
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'totalfee'
        Title.Alignment = taCenter
        Title.Caption = #30446#21069#20070#36153
        Width = 52
        Visible = True
      end
      item
        Color = cl3DLight
        Expanded = False
        FieldName = 'operatorID'
        Title.Alignment = taCenter
        Title.Caption = #25805#20316#21592
        Width = 52
        Visible = True
      end
      item
        Expanded = False
        FieldName = 'lastTime'
        Title.Alignment = taCenter
        Title.Caption = #26368#36817#30331#24405#26085#26399
        Width = 52
        Visible = True
      end>
  end
  object GroupBox1: TGroupBox
    Left = 8
    Top = 144
    Width = 521
    Height = 145
    Caption = #29677#32423#20449#24687
    TabOrder = 1
    object Label1: TLabel
      Left = 40
      Top = 24
      Width = 42
      Height = 14
      Caption = #29677#32423#21517
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #26999#20307'_GB2312'
      Font.Style = []
      ParentFont = False
    end
    object Label2: TLabel
      Left = 282
      Top = 24
      Width = 56
      Height = 14
      Caption = #25152#23398#19987#19994
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #26999#20307'_GB2312'
      Font.Style = []
      ParentFont = False
    end
    object Label3: TLabel
      Left = 26
      Top = 48
      Width = 56
      Height = 14
      Caption = #20837#23398#26102#38388
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #26999#20307'_GB2312'
      Font.Style = []
      ParentFont = False
    end
    object Label4: TLabel
      Left = 282
      Top = 48
      Width = 56
      Height = 14
      Caption = #25152#22312#38498#31995
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #26999#20307'_GB2312'
      Font.Style = []
      ParentFont = False
    end
    object Label5: TLabel
      Left = 54
      Top = 72
      Width = 28
      Height = 14
      Caption = #29677#38271
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #26999#20307'_GB2312'
      Font.Style = []
      ParentFont = False
    end
    object Label6: TLabel
      Left = 254
      Top = 72
      Width = 84
      Height = 14
      Caption = #29677#38271#32852#31995#30005#35805
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #26999#20307'_GB2312'
      Font.Style = []
      ParentFont = False
    end
    object Label7: TLabel
      Left = 40
      Top = 96
      Width = 42
      Height = 14
      Caption = #29677#20027#20219
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #26999#20307'_GB2312'
      Font.Style = []
      ParentFont = False
    end
    object Label8: TLabel
      Left = 240
      Top = 96
      Width = 98
      Height = 14
      Caption = #29677#20027#20219#32852#31995#30005#35805
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #26999#20307'_GB2312'
      Font.Style = []
      ParentFont = False
    end
    object Label9: TLabel
      Left = 54
      Top = 120
      Width = 28
      Height = 14
      Caption = #20154#25968
      Font.Charset = GB2312_CHARSET
      Font.Color = clWindowText
      Font.Height = -14
      Font.Name = #26999#20307'_GB2312'
      Font.Style = []
      ParentFont = False
    end
    object Edit1: TEdit
      Left = 88
      Top = 16
      Width = 121
      Height = 21
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      TabOrder = 0
      OnExit = Edit1Exit
    end
    object Edit2: TEdit
      Left = 344
      Top = 16
      Width = 153
      Height = 21
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      TabOrder = 1
    end
    object MaskEdit1: TMaskEdit
      Left = 88
      Top = 40
      Width = 120
      Height = 21
      EditMask = '!9999/99/00;1;_'
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      MaxLength = 10
      TabOrder = 2
      Text = '    -  -  '
    end
    object Edit33: TEdit
      Left = 344
      Top = 40
      Width = 153
      Height = 21
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      TabOrder = 3
    end
    object Edit4: TEdit
      Left = 88
      Top = 64
      Width = 121
      Height = 21
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      TabOrder = 4
    end
    object Edit5: TEdit
      Left = 344
      Top = 64
      Width = 153
      Height = 21
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      TabOrder = 5
    end
    object Edit6: TEdit
      Left = 88
      Top = 88
      Width = 121
      Height = 21
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      TabOrder = 6
    end
    object Edit7: TEdit
      Left = 344
      Top = 88
      Width = 153
      Height = 21
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      TabOrder = 7
    end
    object Edit8: TEdit
      Left = 88
      Top = 112
      Width = 121
      Height = 21
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      TabOrder = 8
    end
  end
  object BitBtn1: TBitBtn
    Left = 288
    Top = 299
    Width = 75
    Height = 25
    Caption = #30830#23450
    Default = True
    Enabled = False
    TabOrder = 2
    OnClick = BitBtn1Click
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000120B0000120B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
      555555555555555555555555555555555555555555FF55555555555559055555
      55555555577FF5555555555599905555555555557777F5555555555599905555
      555555557777FF5555555559999905555555555777777F555555559999990555
      5555557777777FF5555557990599905555555777757777F55555790555599055
      55557775555777FF5555555555599905555555555557777F5555555555559905
      555555555555777FF5555555555559905555555555555777FF55555555555579
      05555555555555777FF5555555555557905555555555555777FF555555555555
      5990555555555555577755555555555555555555555555555555}
    NumGlyphs = 2
  end
  object BitBtn2: TBitBtn
    Left = 408
    Top = 299
    Width = 75
    Height = 25
    Caption = #36864#20986
    TabOrder = 3
    OnClick = BitBtn2Click
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000120B0000120B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
      03333377777777777F333301111111110333337F333333337F33330111111111
      0333337F333333337F333301111111110333337F333333337F33330111111111
      0333337F333333337F333301111111110333337F333333337F33330111111111
      0333337F3333333F7F333301111111B10333337F333333737F33330111111111
      0333337F333333337F333301111111110333337F33FFFFF37F3333011EEEEE11
      0333337F377777F37F3333011EEEEE110333337F37FFF7F37F3333011EEEEE11
      0333337F377777337F333301111111110333337F333333337F33330111111111
      0333337FFFFFFFFF7F3333000000000003333377777777777333}
    NumGlyphs = 2
  end
  object BitBtn3: TBitBtn
    Left = 48
    Top = 299
    Width = 75
    Height = 25
    Caption = #26032#24314
    TabOrder = 4
    OnClick = BitBtn3Click
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000130B0000130B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
      333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
      0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
      07333337F33333337F333330FFFFFFFF07333337F33333337F333330FFFFFFFF
      07333FF7F33333337FFFBBB0FFFFFFFF0BB37777F3333333777F3BB0FFFFFFFF
      0BBB3777F3333FFF77773330FFFF000003333337F333777773333330FFFF0FF0
      33333337F3337F37F3333330FFFF0F0B33333337F3337F77FF333330FFFF003B
      B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
      3BB33773333773333773B333333B3333333B7333333733333337}
    NumGlyphs = 2
  end
  object BitBtn4: TBitBtn
    Left = 168
    Top = 299
    Width = 75
    Height = 25
    Caption = #21024#38500
    TabOrder = 5
    OnClick = BitBtn4Click
    Glyph.Data = {
      76010000424D7601000000000000760000002800000020000000100000000100
      04000000000000010000130B0000130B00001000000000000000000000000000
      800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
      FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
      333333333333333333FF33333333333330003333333333333777333333333333
      300033FFFFFF3333377739999993333333333777777F3333333F399999933333
      3300377777733333337733333333333333003333333333333377333333333333
      3333333333333333333F333333333333330033333F33333333773333C3333333
      330033337F3333333377333CC3333333333333F77FFFFFFF3FF33CCCCCCCCCC3
      993337777777777F77F33CCCCCCCCCC399333777777777737733333CC3333333
      333333377F33333333FF3333C333333330003333733333333777333333333333
      3000333333333333377733333333333333333333333333333333}
    NumGlyphs = 2
  end
  object Edit3: TComboBox
    Left = 352
    Top = 184
    Width = 153
    Height = 21
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    ItemHeight = 13
    TabOrder = 6
  end
  object DataSource1: TDataSource
    DataSet = frmDataModule.ClassManage
    Left = 47
    Top = 70
  end
end