From 5e01f4ab6d0f3dd5ffa011b2a5638d5248e99f0f Mon Sep 17 00:00:00 2001
From: jaybinks <jaybinks@b956fd51-792f-4845-bead-9b4dfca2ff2c>
Date: Wed, 19 Sep 2007 13:26:58 +0000
Subject: trying to fix lazarus runtime errors.. also adding files to make sure
 everything required for lazarus compile, is in svn.

git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@399 b956fd51-792f-4845-bead-9b4dfca2ff2c
---
 Game/Code/Classes/TextGL.pas | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'Game/Code/Classes/TextGL.pas')

diff --git a/Game/Code/Classes/TextGL.pas b/Game/Code/Classes/TextGL.pas
index 12a9a8dc..b61e2657 100644
--- a/Game/Code/Classes/TextGL.pas
+++ b/Game/Code/Classes/TextGL.pas
@@ -73,12 +73,14 @@ procedure BuildFont;			                // Build Our Bitmap Font
   var
     Rejestr:  TResourceStream;
   begin
+    {$IFNDEF FPC}
     Rejestr := TResourceStream.Create(HInstance, aResourceName , pchar( aType ) );
     try
       Rejestr.Read(Fonts[ aID ].Width, 256);
     finally
       Rejestr.Free;
     end;
+    {$ENDIF}
   end;
 
 var
-- 
cgit v1.2.3