oldstu.dfm

老年人大学的学籍管理,主要是学费收取

        UIStyle = Protein
        TabOrder = 3
        Transparent = False
        ModalResult = 0
        FocusedRectMargin = 2
        Layout = blGlyphLeft
        Spacing = 4
        MouseContinuouslyDownInterval = 100
        OnClick = btnrefreshClick
        ResHandle = 0
      end
      object btnjiao: TsuiButton
        Left = 511
        Top = 28
        Width = 80
        Height = 27
        Caption = #24050#20132#36153#23398#29983
        AutoSize = False
        UIStyle = Protein
        TabOrder = 4
        Transparent = False
        ModalResult = 0
        FocusedRectMargin = 2
        Layout = blGlyphLeft
        Spacing = 4
        MouseContinuouslyDownInterval = 100
        OnClick = btnjiaoClick
        ResHandle = 0
      end
      object btnwei: TsuiButton
        Left = 608
        Top = 28
        Width = 80
        Height = 27
        Caption = #26410#20132#36153#23398#29983
        AutoSize = False
        UIStyle = Protein
        TabOrder = 5
        Transparent = False
        ModalResult = 0
        FocusedRectMargin = 2
        Layout = blGlyphLeft
        Spacing = 4
        MouseContinuouslyDownInterval = 100
        OnClick = btnweiClick
        ResHandle = 0
      end
    end
    object dgstu: TDBGridEh
      Left = 0
      Top = 153
      Width = 715
      Height = 301
      Align = alClient
      Ctl3D = False
      DataSource = dsstu
      FooterColor = clWindow
      FooterFont.Charset = DEFAULT_CHARSET
      FooterFont.Color = clWindowText
      FooterFont.Height = -11
      FooterFont.Name = 'MS Sans Serif'
      FooterFont.Style = []
      FooterRowCount = 1
      FrozenCols = 3
      Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
      OptionsEh = [dghHighlightFocus, dghClearSelection, dghDialogFind]
      ParentCtl3D = False
      TabOrder = 2
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = []
      Columns = <
        item
          EditButtons = <>
          FieldName = 'id'
          Footers = <>
          Title.Alignment = taCenter
          Title.Caption = #27969#27700#21495
        end
        item
          EditButtons = <>
          FieldName = 'stuid'
          Footers = <>
          Title.Alignment = taCenter
          Title.Caption = #23398#21495
          Width = 80
        end
        item
          EditButtons = <>
          FieldName = 'stuname'
          Footers = <>
          Title.Alignment = taCenter
          Title.Caption = #22995#21517
          Width = 80
        end
        item
          EditButtons = <>
          FieldName = 'dep'
          Footers = <>
          Title.Alignment = taCenter
          Title.Caption = #31995
          Width = 80
        end
        item
          EditButtons = <>
          FieldName = 'major'
          Footers = <>
          Title.Alignment = taCenter
          Title.Caption = #19987#19994
          Width = 80
        end
        item
          EditButtons = <>
          FieldName = 'grade'
          Footers = <>
          Title.Alignment = taCenter
          Title.Caption = #24180#32423
          Width = 80
        end
        item
          EditButtons = <>
          FieldName = 'class'
          Footers = <>
          Title.Alignment = taCenter
          Title.Caption = #29677#32423
          Width = 80
        end
        item
          EditButtons = <>
          FieldName = 'schooldate'
          Footers = <>
          Title.Alignment = taCenter
          Title.Caption = #20837#23398#26085#26399
          Width = 100
        end
        item
          EditButtons = <>
          FieldName = 'status'
          Footers = <>
          Visible = False
        end>
    end
    object suiPanel1: TsuiPanel
      Left = 0
      Top = 84
      Width = 715
      Height = 69
      UIStyle = Protein
      BorderColor = clBlack
      Caption = #23398#29983#36164#26009
      ShowButton = True
      CaptionFontColor = clWhite
      Align = alTop
      TabOrder = 3
      Color = clWhite
      object Label1: TLabel
        Left = 14
        Top = 39
        Width = 30
        Height = 13
        AutoSize = False
        Caption = #23398#21495
      end
      object Label2: TLabel
        Left = 117
        Top = 39
        Width = 29
        Height = 13
        AutoSize = False
        Caption = #22995#21517
      end
      object Label3: TLabel
        Left = 227
        Top = 39
        Width = 21
        Height = 13
        AutoSize = False
        Caption = #31995
      end
      object Label4: TLabel
        Left = 332
        Top = 39
        Width = 29
        Height = 13
        AutoSize = False
        Caption = #19987#19994
      end
      object Label5: TLabel
        Left = 454
        Top = 39
        Width = 28
        Height = 13
        AutoSize = False
        Caption = #24180#32423
      end
      object Label6: TLabel
        Left = 577
        Top = 39
        Width = 29
        Height = 13
        AutoSize = False
        Caption = #29677#32423
      end
      object edtid: TsuiEdit
        Left = 42
        Top = 36
        Width = 70
        Height = 19
        UIStyle = Protein
        BorderColor = clBlack
        ReadOnly = True
        TabOrder = 0
      end
      object edtname: TsuiEdit
        Left = 148
        Top = 36
        Width = 75
        Height = 19
        UIStyle = Protein
        BorderColor = clBlack
        ReadOnly = True
        TabOrder = 1
      end
      object edtdep: TsuiEdit
        Left = 247
        Top = 36
        Width = 82
        Height = 19
        UIStyle = Protein
        BorderColor = clBlack
        ReadOnly = True
        TabOrder = 2
      end
      object edtmajor: TsuiEdit
        Left = 367
        Top = 36
        Width = 82
        Height = 19
        UIStyle = Protein
        BorderColor = clBlack
        ReadOnly = True
        TabOrder = 3
      end
      object edtgrade: TsuiEdit
        Left = 489
        Top = 36
        Width = 85
        Height = 19
        UIStyle = Protein
        BorderColor = clBlack
        ReadOnly = True
        TabOrder = 4
      end
      object edtclass: TsuiEdit
        Left = 611
        Top = 36
        Width = 88
        Height = 19
        UIStyle = Protein
        BorderColor = clBlack
        ReadOnly = True
        TabOrder = 5
      end
    end
  end
  object adqstu: TADOQuery
    Connection = frmmain.adc
    Parameters = <>
    Left = 272
    Top = 208
  end
  object dsstu: TDataSource
    DataSet = adqstu
    OnDataChange = dsstuDataChange
    Left = 328
    Top = 208
  end
end