lib_manager.~pas

来自「很不错很实用的学生联机考试系统」· ~PAS 代码 · 共 42 行

unit lib_manager;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, DB, DBTables, Grids, DBGrids, Menus, ExtCtrls, DBCtrls, StdCtrls;

type
  Tlibmanager = class(TForm)
    DBGrid1: TDBGrid;
    DataSource1: TDataSource;
    MainMenu1: TMainMenu;
    N1: TMenuItem;
    N2: TMenuItem;
    N3: TMenuItem;
    N4: TMenuItem;
    N5: TMenuItem;
    N6: TMenuItem;
    N7: TMenuItem;
    N8: TMenuItem;
    DBNavigator1: TDBNavigator;
    Table1: TTable;
    DBMemo1: TDBMemo;
    Label1: TLabel;
    Label2: TLabel;
    Label3: TLabel;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  libmanager: Tlibmanager;

implementation

{$R *.dfm}

end.