lazarus-ccr/components/onguard/examples/nafmgr/nafmgr.lpr

program NAFMgr;

{$mode objfpc}{$H+}

uses
  Interfaces,
  Forms,
  ogfirst in '..\..\source\ogfirst.pas',
  NAFMGR1 in 'NAFMGR1.pas' {NafFrm};

{$R *.res}

begin
  Application.Initialize;
  Application.Title := 'Network File Access Manager';
  Application.CreateForm(TNafFrm, NafFrm);

  if IsFirstInstance then
    Application.Run
  else
    ActivateFirstInstance;
end.