uselecourse.dfm

本文件为使用Delphi开发的学生信息管理系统,演示了如何使用BDE来开发数据库应用程序!

object frmSeleCourse: TfrmSeleCourse
  Left = 89
  Top = 171
  Width = 540
  Height = 447
  Caption = #23398#29983#36873#35838#31995#32479
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  OnActivate = FormActivate
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 529
    Height = 89
    BevelInner = bvLowered
    TabOrder = 0
    object Panel2: TPanel
      Left = 8
      Top = 8
      Width = 513
      Height = 73
      TabOrder = 0
      object Label1: TLabel
        Left = 24
        Top = 16
        Width = 73
        Height = 13
        AutoSize = False
        Caption = #35831#36755#20837#23398#21495
      end
      object Label2: TLabel
        Left = 32
        Top = 48
        Width = 30
        Height = 13
        Caption = #22995'  '#21517
      end
      object Label3: TLabel
        Left = 144
        Top = 48
        Width = 33
        Height = 13
        Caption = #31995'   '#21035
      end
      object Label4: TLabel
        Left = 280
        Top = 48
        Width = 48
        Height = 13
        Caption = #24050#20462#23398#20998
      end
      object Button1: TButton
        Left = 240
        Top = 8
        Width = 75
        Height = 25
        Caption = #26597'     '#35810
        TabOrder = 0
        OnClick = Button1Click
      end
      object DBEdit2: TDBEdit
        Left = 64
        Top = 48
        Width = 73
        Height = 21
        DataField = 'sname'
        DataSource = DataModule3.snoDS
        ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899' IME 3.0'
        TabOrder = 1
      end
      object DBEdit3: TDBEdit
        Left = 184
        Top = 48
        Width = 81
        Height = 21
        DataField = 'dname'
        DataSource = DataModule3.snoDS
        ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899' IME 3.0'
        TabOrder = 2
      end
      object ComboBox1: TComboBox
        Left = 96
        Top = 8
        Width = 129
        Height = 21
        ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899' IME 3.0'
        ItemHeight = 13
        TabOrder = 3
        Text = '20041001'
      end
      object DBEdit1: TDBEdit
        Left = 336
        Top = 48
        Width = 65
        Height = 21
        DataField = 'SUM OF credit'
        DataSource = DataSource1
        ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899' IME 3.0'
        TabOrder = 4
      end
    end
  end
  object Panel3: TPanel
    Left = 0
    Top = 96
    Width = 529
    Height = 161
    BevelInner = bvLowered
    TabOrder = 1
    object Label5: TLabel
      Left = 384
      Top = 32
      Width = 81
      Height = 13
      AutoSize = False
      Caption = #35831#36755#20837#35838#31243#21495
    end
    object Panel4: TPanel
      Left = 8
      Top = 8
      Width = 329
      Height = 145
      TabOrder = 0
      object Label7: TLabel
        Left = 16
        Top = 8
        Width = 57
        Height = 13
        AutoSize = False
        Caption = #21487#36873#35838#31243
      end
      object DBGrid1: TDBGrid
        Left = 1
        Top = 24
        Width = 327
        Height = 113
        DataSource = DataModule3.courseDS
        ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899' IME 3.0'
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
      end
    end
    object MaskEdit1: TMaskEdit
      Left = 400
      Top = 64
      Width = 92
      Height = 21
      EditMask = '0000;1;_'
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899' IME 3.0'
      MaxLength = 4
      TabOrder = 1
      Text = '1001'
    end
    object Button2: TButton
      Left = 416
      Top = 104
      Width = 75
      Height = 25
      Caption = #26597#35810#35838#31243
      TabOrder = 2
      OnClick = Button2Click
    end
  end
  object Panel5: TPanel
    Left = 0
    Top = 263
    Width = 529
    Height = 150
    BevelInner = bvLowered
    TabOrder = 2
    object Label8: TLabel
      Left = 448
      Top = 24
      Width = 57
      Height = 13
      AutoSize = False
      Caption = #36873#35838#38376#25968
    end
    object Label9: TLabel
      Left = 456
      Top = 96
      Width = 41
      Height = 13
      AutoSize = False
      Caption = #24635#23398#20998
    end
    object Panel6: TPanel
      Left = 8
      Top = 8
      Width = 329
      Height = 137
      TabOrder = 0
      object Label6: TLabel
        Left = 16
        Top = 8
        Width = 129
        Height = 13
        AutoSize = False
        Caption = #24050#36873#20294#26410#36890#36807#35838#31243
      end
      object DBGrid2: TDBGrid
        Left = 8
        Top = 24
        Width = 313
        Height = 104
        DataSource = DataModule3.scDS
        ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899' IME 3.0'
        TabOrder = 0
        TitleFont.Charset = DEFAULT_CHARSET
        TitleFont.Color = clWindowText
        TitleFont.Height = -11
        TitleFont.Name = 'MS Sans Serif'
        TitleFont.Style = []
      end
    end
    object Button3: TButton
      Left = 352
      Top = 48
      Width = 75
      Height = 25
      Caption = #36873'      '#35838
      TabOrder = 1
      OnClick = Button3Click
    end
    object Button4: TButton
      Left = 352
      Top = 112
      Width = 75
      Height = 25
      Caption = #36864'     '#36873
      TabOrder = 2
      OnClick = Button4Click
    end
    object DBEdit4: TDBEdit
      Left = 440
      Top = 48
      Width = 62
      Height = 21
      DataField = 'COUNT OF cno'
      DataSource = DataModule3.statisticsDS
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899' IME 3.0'
      TabOrder = 3
    end
    object DBEdit5: TDBEdit
      Left = 440
      Top = 120
      Width = 65
      Height = 21
      DataField = 'SUM OF credit'
      DataSource = DataModule3.statisticsDS
      ImeName = #20013#25991' ('#31616#20307') - '#24494#36719#25340#38899' IME 3.0'
      TabOrder = 4
    end
  end
  object DataSource1: TDataSource
    DataSet = DataModule3.creditalquery
    Left = 256
    Top = 208
  end
end