unit6.pas

简单的选课系统 采用delphi书写 包含简单的管理功能以及学生 教师 管理员登陆

unit Unit6;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, DB, ADODB, StdCtrls;

type
  TData = class(TForm)
    GroupBox1: TGroupBox;
    DataSource1: TDataSource;
    ADOQuery1: TADOQuery;
    Data2: TGroupBox;
    DataSource2: TDataSource;
    ADOQuery2: TADOQuery;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Data: TData;

implementation

{$R *.dfm}

end.