mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-12-04 06:07:29 +01:00
turbopoweripro: fixed using LCLType.THandle instead of system.THandle
git-svn-id: trunk@42137 -
This commit is contained in:
parent
633c1f924a
commit
2d2d2abe02
@ -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
|
||||
|
||||
Loading…
Reference in New Issue
Block a user