pascal/lazarus-ccr
1
0
Fork 0
Code Issues Releases Activity

* Added version2 branch of Geckoport, branched from version 1

Browse Source 
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@2348 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
loesje_
2012-03-16 11:32:18 +00:00
parent 35a067e943
commit 50aaeec1c9
83 changed files with 40766 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

28
components/geckoport/version2/SampleApps/GBrowser.dpr Normal file
View File

@@ -0,0 +1,28 @@
program GBrowser;
uses
{$IFDEF LCL}
Interfaces,
{$IFDEF MSWINDOWS}
Math,
{$ENDIF}
{$ENDIF}
Forms,
gec10 in 'gec10.pas' {Form1};
{$IFDEF MSWINDOWS}
{$R *.res}
{$ENDIF}
begin
{$IFDEF FPC}
{$IFDEF MSWINDOWS}
//For now - disable all floating point exceptions or XULRUNNER will crash.
SetExceptionMask([exInvalidOp,exDenormalized,exZeroDivide,exOverflow,exUnderflow,exPrecision]);
{$ENDIF}
{$ENDIF}
Application.Initialize;
Application.CreateForm(TForm1, Form1);
Application.Run;
end.