diff options
| author | tobigun <tobigun@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2008-02-05 15:59:57 +0000 |
|---|---|---|
| committer | tobigun <tobigun@b956fd51-792f-4845-bead-9b4dfca2ff2c> | 2008-02-05 15:59:57 +0000 |
| commit | aaae25658c97ae3f1b1f00fb8158c93cdb566342 (patch) | |
| tree | 85405ed6ef5e0665e8f891ed9588013ede471fef | |
| parent | 31056e848f9aa03e4adf40e9480b122bc510f2cf (diff) | |
| download | usdx-aaae25658c97ae3f1b1f00fb8158c93cdb566342.tar.gz usdx-aaae25658c97ae3f1b1f00fb8158c93cdb566342.tar.xz usdx-aaae25658c97ae3f1b1f00fb8158c93cdb566342.zip | |
Made this FPC (for windows) compatible
git-svn-id: svn://svn.code.sf.net/p/ultrastardx/svn/trunk@821 b956fd51-792f-4845-bead-9b4dfca2ff2c
| -rw-r--r-- | Game/Code/lib/other/DirWatch.pas | 14 |
1 files changed, 13 insertions, 1 deletions
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,
|