reward.dfm

Delphi+SQL的学生信息管理系统

object frmreward: Tfrmreward
  Left = 82
  Top = 174
  Width = 617
  Height = 470
  Caption = #22870#21169#24773#20917#35760#24405#31383#20307
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object DBGrid1: TDBGrid
    Left = 0
    Top = 1
    Width = 217
    Height = 440
    DataSource = dsreward
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgConfirmDelete, dgCancelOnExit]
    TabOrder = 0
    TitleFont.Charset = DEFAULT_CHARSET
    TitleFont.Color = clWindowText
    TitleFont.Height = -11
    TitleFont.Name = 'MS Sans Serif'
    TitleFont.Style = []
    Columns = <
      item
        Alignment = taCenter
        Expanded = False
        FieldName = 'RID'
        Title.Alignment = taCenter
        Title.Caption = #35760#24405#21495
        Visible = True
      end
      item
        Alignment = taCenter
        Expanded = False
        FieldName = 'reward'
        Title.Alignment = taCenter
        Title.Caption = #22870#21169#31867#22411
        Visible = True
      end
      item
        Alignment = taCenter
        Expanded = False
        FieldName = 'recdate'
        Title.Alignment = taCenter
        Title.Caption = #35760#24405#26085#26399
        Visible = True
      end>
  end
  object Panel1: TPanel
    Left = 214
    Top = 1
    Width = 187
    Height = 184
    TabOrder = 1
    object Label1: TLabel
      Left = 8
      Top = 16
      Width = 57
      Height = 13
      Caption = #35760#24405#21495#65306'   '
    end
    object Label2: TLabel
      Left = 8
      Top = 56
      Width = 48
      Height = 13
      Caption = ' '#23398' '#21495#65306'  '
    end
    object Label3: TLabel
      Left = 8
      Top = 104
      Width = 63
      Height = 13
      Caption = ' '#35760#24405#26085#26399#65306
    end
    object BitBtn1: TBitBtn
      Left = 48
      Top = 144
      Width = 75
      Height = 25
      Caption = #36864#20986
      TabOrder = 0
      OnClick = BitBtn1Click
    end
    object DBERID: TDBEdit
      Left = 56
      Top = 16
      Width = 121
      Height = 21
      DataField = 'RID'
      DataSource = dsreward
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      TabOrder = 1
      OnKeyDown = DBERIDKeyDown
    end
    object DBEstudentID: TDBEdit
      Left = 56
      Top = 56
      Width = 121
      Height = 21
      DataField = 'studentID'
      DataSource = dsreward
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      TabOrder = 2
    end
    object DBErecdate: TDBEdit
      Left = 80
      Top = 96
      Width = 105
      Height = 21
      DataField = 'recdate'
      DataSource = dsreward
      ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
      TabOrder = 3
    end
  end
  object DBNreward: TDBNavigator
    Left = 241
    Top = 191
    Width = 340
    Height = 25
    DataSource = dsreward
    TabOrder = 2
    OnClick = DBNrewardClick
  end
  object DBRGreward: TDBRadioGroup
    Left = 221
    Top = 224
    Width = 377
    Height = 97
    Caption = #22870#21169#31867#22411
    Columns = 3
    DataField = 'reward'
    DataSource = dsreward
    Items.Strings = (
      #22269#23478#19968#31561#22870#23398#37329
      #22269#23478#20108#31561#22870#23398#37329
      #22269#23478#19977#31561#22870#23398#37329
      #30465#19968#31561#22870#23398#37329
      #30465#20108#31561#22870#23398#37329
      #30465#19977#31561#22870#23398#37329
      #38498#19968#31561#22870#23398#37329
      #38498#20108#31561#22870#23398#37329
      #38498#19977#31561#22870#23398#37329)
    TabOrder = 3
    Values.Strings = (
      #22269#23478#19968#31561#22870#23398#37329
      #22269#23478#20108#31561#22870#23398#37329
      #22269#23478#19977#31561#22870#23398#37329
      #30465#19968#31561#22870#23398#37329
      #30465#20108#31561#22870#23398#37329
      #30465#19977#31561#22870#23398#37329
      #38498#19968#31561#22870#23398#37329
      #38498#20108#31561#22870#23398#37329
      #38498#19977#31561#22870#23398#37329)
  end
  object DBMDesc: TDBMemo
    Left = 221
    Top = 328
    Width = 377
    Height = 113
    DataField = 'description'
    DataSource = dsreward
    ImeName = #20013#25991' ('#31616#20307') - '#26234#33021' ABC'
    TabOrder = 4
  end
  object GroupBox1: TGroupBox
    Left = 404
    Top = 0
    Width = 201
    Height = 185
    Caption = 'GroupBox1'
    TabOrder = 5
    object Label4: TLabel
      Left = 18
      Top = 27
      Width = 39
      Height = 13
      Caption = ' '#22995#21517#65306
    end
    object Label5: TLabel
      Left = 20
      Top = 57
      Width = 42
      Height = 13
      Caption = ' '#24615#21035#65306' '
    end
    object Label6: TLabel
      Left = 16
      Top = 84
      Width = 63
      Height = 13
      Caption = #20986#29983#26085#26399#65306' '
    end
    object Label7: TLabel
      Left = 16
      Top = 117
      Width = 63
      Height = 13
      Caption = #25152#22312#29677#32423#65306' '
    end
    object Label8: TLabel
      Left = 16
      Top = 150
      Width = 51
      Height = 13
      Caption = #29677#20027#20219#65306' '
    end
    object DBTname: TDBText
      Left = 80
      Top = 24
      Width = 105
      Height = 17
      Color = clSkyBlue
      DataField = 'name'
      DataSource = dsstudent
      ParentColor = False
    end
    object DBTsex: TDBText
      Left = 80
      Top = 52
      Width = 105
      Height = 17
      Color = clSkyBlue
      DataField = 'sex'
      DataSource = dsstudent
      ParentColor = False
    end
    object DBTbirthday: TDBText
      Left = 80
      Top = 82
      Width = 105
      Height = 17
      Color = clSkyBlue
      DataField = 'birthday'
      DataSource = dsstudent
      ParentColor = False
    end
    object DBTclass: TDBText
      Left = 80
      Top = 115
      Width = 105
      Height = 17
      Color = clSkyBlue
      DataField = 'classname'
      DataSource = dsclass
      ParentColor = False
    end
    object DBTmaster: TDBText
      Left = 80
      Top = 147
      Width = 105
      Height = 17
      Color = clSkyBlue
      DataField = 'master'
      DataSource = dsclass
      ParentColor = False
    end
  end
  object tblreward: TTable
    BeforeDelete = tblrewardBeforeDelete
    AfterScroll = tblrewardAfterScroll
    DatabaseName = 'stud'
    TableName = 'dbo.reward'
    Left = 40
    Top = 64
  end
  object tblstudent: TTable
    DatabaseName = 'stud'
    IndexFieldNames = 'studentID'
    MasterFields = 'studentID'
    MasterSource = dsreward
    TableName = 'dbo.student'
    Left = 40
    Top = 136
  end
  object tblclass: TTable
    DatabaseName = 'stud'
    IndexFieldNames = 'classID'
    MasterFields = 'classID'
    MasterSource = dsstudent
    TableName = 'dbo.class'
    Left = 40
    Top = 232
  end
  object dsreward: TDataSource
    DataSet = tblreward
    Left = 112
    Top = 64
  end
  object dsstudent: TDataSource
    DataSet = tblstudent
    Left = 112
    Top = 136
  end
  object dsclass: TDataSource
    DataSet = tblclass
    Left = 112
    Top = 232
  end
  object Query1: TQuery
    DatabaseName = 'stud'
    Left = 176
    Top = 120
  end
end