pregserver.dpr

图书管理系统,采用delphi开发工具,是个小型的管理系统,该压缩文件只提供源代码

program pRegServer;

uses
  Forms,
  Windows,
  uRegServer in 'uRegServer.pas' {frmxzBooksRegServer};

{$R *.res}

const
  ClassName='TfrmxzBooksRegServer';

var
  handle:integer;

begin
  Application.Initialize;
  handle:=findwindow(classname,nil);
  if handle<> 0 then
  begin
    messagebox(0,'小珠图书租赁管理系统数据库注册机已经运行！','木瓜',0);
    halt;
  end;
//  Application.ShowMainForm :=False;
  Application.CreateForm(TfrmxzBooksRegServer, frmxzBooksRegServer);
  Application.Run;
end.