From aaae25658c97ae3f1b1f00fb8158c93cdb566342 Mon Sep 17 00:00:00 2001
From: tobigun <tobigun@b956fd51-792f-4845-bead-9b4dfca2ff2c>
Date: Tue, 5 Feb 2008 15:59:57 +0000
Subject: Made this FPC (for windows) compatible

git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@821 b956fd51-792f-4845-bead-9b4dfca2ff2c
---
 Game/Code/lib/other/DirWatch.pas | 14 +++++++++++++-
 1 file changed, 13 insertions(+), 1 deletion(-)

(limited to 'Game')

diff --git a/Game/Code/lib/other/DirWatch.pas b/Game/Code/lib/other/DirWatch.pas
index 88c3489e..b14fa791 100644
--- a/Game/Code/lib/other/DirWatch.pas
+++ b/Game/Code/lib/other/DirWatch.pas
@@ -23,8 +23,20 @@ unit DirWatch;
 
 interface
 
+{$IFDEF FPC}
+  {$MODE Delphi}
+{$ENDIF}
+
 uses
-  Windows, Messages, SysUtils, Forms, Classes;
+  Windows,
+  Messages,
+  SysUtils,
+  {$IFDEF LCL}
+  LCLIntf, // used for AllocateHWnd
+  {$ELSE}
+  Forms,
+  {$ENDIF}
+  Classes;
 
 type
   TNotifyFilters = set of (nfFilename, nfDirname, nfAttrib,
-- 
cgit v1.2.3