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

program CodeGen;

{$mode objfpc}{$H+}

{.$MODE Delphi}

uses
  Interfaces,
  LCLVersion,
  Forms,
  CodeGenU in 'CODEGENU.pas' {CodeGenFrm}, tponguard;


{$R *.res}

begin
  {$IF LCL_FullVersion >= 3000000}
  Application.Scaled:=True;
  {$ENDIF}
  Application.Title:='';
  Application.Initialize;
  Application.CreateForm(TCodeGenFrm, CodeGenFrm);
  Application.Run;
end.