unit5.dfm

这个是用oracle和delphi开发的学生信息管理系统 包括oracle的存储过程和源码

object Frmsc: TFrmsc
  Left = 310
  Top = 204
  Width = 446
  Height = 351
  Caption = #36873#35838#31649#29702
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = []
  OldCreateOrder = False
  PixelsPerInch = 96
  TextHeight = 13
  object GroupBox1: TGroupBox
    Left = 8
    Top = 0
    Width = 417
    Height = 265
    Caption = #36873#35838#20449#24687
    TabOrder = 0
    object Label1: TLabel
      Left = 104
      Top = 96
      Width = 30
      Height = 13
      Caption = #23398'  '#21495
    end
    object Label2: TLabel
      Left = 104
      Top = 48
      Width = 36
      Height = 13
      Caption = #35838#31243#21495
    end
    object Label3: TLabel
      Left = 104
      Top = 136
      Width = 30
      Height = 13
      Caption = #25104'  '#32489
    end
    object Label4: TLabel
      Left = 104
      Top = 176
      Width = 48
      Height = 13
      Caption = #32771#35797#26102#38388
    end
    object Edsno: TEdit
      Left = 160
      Top = 96
      Width = 121
      Height = 21
      TabOrder = 0
    end
    object Edcno: TEdit
      Left = 160
      Top = 48
      Width = 121
      Height = 21
      TabOrder = 1
    end
    object Edgrade: TEdit
      Left = 160
      Top = 136
      Width = 121
      Height = 21
      TabOrder = 2
    end
    object DateTimePicker1: TDateTimePicker
      Left = 160
      Top = 176
      Width = 121
      Height = 21
      Date = 38846.849954965280000000
      Time = 38846.849954965280000000
      TabOrder = 3
    end
  end
  object Button1: TButton
    Left = 168
    Top = 280
    Width = 75
    Height = 25
    Caption = #36873#35838
    TabOrder = 1
    OnClick = Button1Click
  end
  object ADOConnection1: TADOConnection
    ConnectionString = 
      'Provider=OraOLEDB.Oracle.1;Password=111;Persist Security Info=Tr' +
      'ue;User ID=student;Data Source=ky;PLSQLRSet=1'
    LoginPrompt = False
    Provider = 'OraOLEDB.Oracle.1'
    Left = 336
    Top = 16
  end
  object ADODataSet1: TADODataSet
    Connection = ADOConnection1
    Parameters = <>
    Left = 376
    Top = 16
  end
end