main.pas

证券公司考试系统,三层架构,从题库自动产生试卷,全部主观题

unit Main;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, ExtCtrls, ComCtrls, StdCtrls, Grids, Buttons;

type
  TServer_Main_Frm = class(TForm)
    Panel1: TPanel;
    StatusBar1: TStatusBar;
    GroupBox1: TGroupBox;
    Panel2: TPanel;
    Panel4: TPanel;
    GroupBox3: TGroupBox;
    GroupBox2: TGroupBox;
    Login_ListBox: TListBox;
    Label1: TLabel;
    Count_Label: TLabel;
    Log_ListBox: TListBox;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Server_Main_Frm: TServer_Main_Frm;

implementation

uses Exam_Select_Subjects_server;

{$R *.dfm}


end.