You've already forked lazarus-ccr
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@601 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
22
components/onguard/examples/nafmgr/nafmgr.lpr
Normal file
22
components/onguard/examples/nafmgr/nafmgr.lpr
Normal file
@ -0,0 +1,22 @@
|
||||
program NAFMgr;
|
||||
{$mode objfpc}{$H+}
|
||||
|
||||
uses
|
||||
Interfaces,
|
||||
Forms,
|
||||
ogfirst,
|
||||
NAFMGR1 in 'NAFMGR1.pas' {NafFrm}, tponguard;
|
||||
|
||||
|
||||
|
||||
|
||||
begin
|
||||
Application.Initialize;
|
||||
Application.Title := 'Network File Access Manager';
|
||||
Application.CreateForm(TNafFrm, NafFrm);
|
||||
|
||||
if IsFirstInstance then Application.Run
|
||||
else
|
||||
ActivateFirstInstance;
|
||||
|
||||
end.
|
Reference in New Issue
Block a user