ucredit.dfm

可实现学生成绩管理系统的各种功能,无需登陆,直接查询学生的各种信息

      ParentFont = False
    end
    object LblSno: TLabel
      Left = 20
      Top = 27
      Width = 52
      Height = 13
      Caption = #23398#29983#23398#21495
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clNavy
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object LblGrade: TLabel
      Left = 31
      Top = 176
      Width = 40
      Height = 13
      Caption = #25104'  '#32489
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clNavy
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object LblSName: TLabel
      Left = 20
      Top = 66
      Width = 52
      Height = 13
      Caption = #23398#29983#22995#21517
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clNavy
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object LblCName: TLabel
      Left = 21
      Top = 139
      Width = 52
      Height = 13
      Caption = #35838#31243#21517#31216
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clNavy
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object LblRec: TLabel
      Left = 40
      Top = 244
      Width = 42
      Height = 14
      Alignment = taRightJustify
      Caption = 'LblRec'
      Font.Charset = GB2312_CHARSET
      Font.Color = clRed
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object LblText: TLabel
      Left = 93
      Top = 244
      Width = 46
      Height = 18
      AutoSize = False
      Caption = #20010#35760#24405
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -14
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object ModeIndicator: TLabel
      Left = 66
      Top = 266
      Width = 48
      Height = 16
      Caption = '[Mode]'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -16
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object LblCredit: TLabel
      Left = 31
      Top = 210
      Width = 40
      Height = 13
      Caption = #23398'  '#20998
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clNavy
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
    end
    object DBEdtCNo: TDBEdit
      Left = 77
      Top = 98
      Width = 62
      Height = 21
      DataField = 'CNO'
      DataSource = ActiveSource
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clBlack
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 1
    end
    object DBGrdProd: TDBGrid
      Left = 188
      Top = 7
      Width = 277
      Height = 280
      DataSource = ActiveSource
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      Options = [dgTitles, dgIndicator, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
      ParentFont = False
      ReadOnly = True
      TabOrder = 3
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -16
      TitleFont.Name = #23435#20307
      TitleFont.Style = []
      Columns = <
        item
          Expanded = False
          FieldName = 'SNO'
          Title.Alignment = taCenter
          Title.Caption = #23398#29983#23398#21495
          Title.Font.Charset = DEFAULT_CHARSET
          Title.Font.Color = clTeal
          Title.Font.Height = -15
          Title.Font.Name = #23435#20307
          Title.Font.Style = []
          Width = 60
          Visible = True
        end
        item
          Alignment = taCenter
          Expanded = False
          FieldName = 'CNO'
          Title.Alignment = taCenter
          Title.Caption = #35838#31243#21495
          Title.Font.Charset = DEFAULT_CHARSET
          Title.Font.Color = clTeal
          Title.Font.Height = -15
          Title.Font.Name = #23435#20307
          Title.Font.Style = []
          Width = 60
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'SCORE'
          Title.Alignment = taCenter
          Title.Caption = #25104#32489
          Title.Font.Charset = DEFAULT_CHARSET
          Title.Font.Color = clTeal
          Title.Font.Height = -16
          Title.Font.Name = #23435#20307
          Title.Font.Style = []
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'CREDIT'
          Title.Alignment = taCenter
          Title.Caption = #23398#20998
          Title.Font.Charset = DEFAULT_CHARSET
          Title.Font.Color = clTeal
          Title.Font.Height = -16
          Title.Font.Name = #23435#20307
          Title.Font.Style = []
          Visible = True
        end>
    end
    object DBEdtSno: TDBEdit
      Left = 77
      Top = 23
      Width = 63
      Height = 21
      DataField = 'SNO'
      DataSource = ActiveSource
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      ParentShowHint = False
      ShowHint = True
      TabOrder = 0
    end
    object DBEdtGrade: TDBEdit
      Left = 78
      Top = 172
      Width = 58
      Height = 21
      DataField = 'SCORE'
      DataSource = ActiveSource
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      TabOrder = 2
    end
    object BtnGetCNo: TButton
      Left = 139
      Top = 98
      Width = 22
      Height = 21
      Cursor = crHandPoint
      Caption = '...'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'Terminal'
      Font.Style = []
      ParentFont = False
      TabOrder = 4
      OnClick = BtnGetCNoClick
    end
    object EdtSName: TEdit
      Left = 77
      Top = 61
      Width = 84
      Height = 21
      Color = clBtnFace
      ReadOnly = True
      TabOrder = 5
    end
    object EdtCName: TEdit
      Left = 77
      Top = 135
      Width = 84
      Height = 21
      Color = clBtnFace
      ReadOnly = True
      TabOrder = 6
    end
    object BtnGetSNo: TButton
      Left = 142
      Top = 23
      Width = 22
      Height = 21
      Cursor = crHandPoint
      Caption = '...'
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clWindowText
      Font.Height = -13
      Font.Name = 'Terminal'
      Font.Style = []
      ParentFont = False
      TabOrder = 7
      OnClick = BtnGetSNoClick
    end
    object EdtCredit: TEdit
      Left = 77
      Top = 206
      Width = 50
      Height = 21
      Color = clBtnFace
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clRed
      Font.Height = -13
      Font.Name = #23435#20307
      Font.Style = []
      ParentFont = False
      ReadOnly = True
      TabOrder = 8
    end
  end
  object ActiveSource: TDataSource
    DataSet = DMSchool.ADOTabGrade
    OnStateChange = ActiveSourceStateChange
    OnDataChange = ActiveSourceDataChange
    Left = 288
    Top = 160
  end
end