From 2d2d2abe028b9a138647970e42e2bbb38582c14d Mon Sep 17 00:00:00 2001
From: mattias <nc-gaertnma@netcologne.de>
Date: Fri, 19 Jul 2013 09:23:53 +0000
Subject: [PATCH] turbopoweripro: fixed using LCLType.THandle instead of
 system.THandle

git-svn-id: trunk@42137 -
---
 components/turbopower_ipro/ipstrms.pas | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/components/turbopower_ipro/ipstrms.pas b/components/turbopower_ipro/ipstrms.pas
index cf04d4e55d..32d36245c6 100644
--- a/components/turbopower_ipro/ipstrms.pas
+++ b/components/turbopower_ipro/ipstrms.pas
@@ -42,6 +42,8 @@ interface
 
 uses
   {$IFDEF IP_LAZARUS}
+  SysUtils,
+  Classes,
   FPCAdds,
   LCLType,
   GraphType,
@@ -49,14 +51,14 @@ uses
   FileUtil,
   {$ELSE}
   Windows,
-  {$ENDIF}
   SysUtils,
   Classes,
+  {$ENDIF}
   IpUtils,
   IpConst;
 
 const
-  IpFileOpenFailed = -1;
+  IpFileOpenFailed = LCLType.Handle(-1);
 
 { TIpMemMapStream  }
 type