* fix compatibility with FPC 3.0 (Thaddy)
git-svn-id: https://svn.code.sf.net/p/kolmck/code@155 91bb2d04-0c0c-4d2d-88a5-bbb6f4c1fa07
This commit is contained in:
37
KOLDEF.inc
37
KOLDEF.inc
@ -360,26 +360,39 @@
|
|||||||
{$ENDIF}
|
{$ENDIF}
|
||||||
|
|
||||||
{$IFDEF FPC}
|
{$IFDEF FPC}
|
||||||
{$DEFINE PAS_ONLY}
|
{$DEFINE PAS_ONLY}
|
||||||
{$DEFINE USE_OLD_FLAGS} //size of set type in fpc is 4 bytes
|
{$DEFINE USE_OLD_FLAGS} //size of set type in fpc is 4 bytes
|
||||||
{------------------------------------
|
{------------------------------------
|
||||||
by Thaddy de Koning:
|
by Thaddy de Koning:
|
||||||
|
|
||||||
FPC version 2.1.1 is very compatible with Delphi and kol now.
|
FPC version 2.1.1 is very compatible with Delphi and kol now.
|
||||||
You can simply use the $(DELPHI)\source\rtl\win\*.pas files from Delphi 4/5 instead of the prepared files that were needed for
|
You can simply use the $(DELPHI)\source\rtl\win\*.pas files from Delphi 4/5 instead of the prepared files that were needed for
|
||||||
FPC1.X
|
FPC1.X
|
||||||
|
|
||||||
That is all to have full compatibility.
|
That is all to have full compatibility.
|
||||||
------------------------------------}
|
------------------------------------}
|
||||||
{$DEFINE PAS_VERSION}
|
{$DEFINE PAS_VERSION}
|
||||||
{$IFDEF VER2}
|
{$IFDEF VER2}
|
||||||
{$DEFINE _D3orHigher}
|
{$DEFINE _D3orHigher}
|
||||||
{$DEFINE _D4orHigher}
|
{$DEFINE _D4orHigher}
|
||||||
{$DEFINE _D5orHigher}
|
{$DEFINE _D5orHigher}
|
||||||
{$DEFINE _D6orHigher}
|
{$DEFINE _D6orHigher}
|
||||||
{$DEFINE _D7}
|
{$DEFINE _D7}
|
||||||
{$DEFINE _D7orHigher}
|
{$DEFINE _D7orHigher}
|
||||||
{$ENDIF}
|
{$ENDIF}
|
||||||
|
{$IFDEF VER3}
|
||||||
|
// I should clean this up later.
|
||||||
|
{$DEFINE VER2}
|
||||||
|
{$DEFINE _D3orHigher}
|
||||||
|
{$DEFINE _D4orHigher}
|
||||||
|
{$DEFINE _D5orHigher}
|
||||||
|
{$DEFINE _D6orHigher}
|
||||||
|
{$DEFINE _D7}
|
||||||
|
{$DEFINE _D7orHigher}
|
||||||
|
{$DEFINE _D2005orHigher}
|
||||||
|
{$DEFINE _D2006orHigher}
|
||||||
|
{$DEFINE _D2007orHigher}
|
||||||
|
{$ENDIF}
|
||||||
{$ENDIF FPC}
|
{$ENDIF FPC}
|
||||||
|
|
||||||
{$IFNDEF _NOT_KOLCtrlWrapper_}
|
{$IFNDEF _NOT_KOLCtrlWrapper_}
|
||||||
|
Reference in New Issue
Block a user