mirror of
https://github.com/HeidiSQL/HeidiSQL.git
synced 2025-08-06 18:24:26 +08:00

* remove Detours package, move code to /source/detours/ * remove Detours code from /source/vcl-styles-utils/delphi-detours-library/, so we have only one version * remove Vcl.FormsFix.pas, as the bugs I fixed with that are most likely fixed with the move to Delphi 10. See https://www.heidisql.com/forum.php?t=19141 for the original bug report. * only vcl-styles-utils uses the Detours lib from now on
49 lines
1008 B
PHP
49 lines
1008 B
PHP
{$DEFINE UseInline}
|
|
{$DEFINE BuildThreadSafe}
|
|
{$DEFINE UseGenerics}
|
|
{$DEFINE UseMultiBytesNop}
|
|
//Define HookInternalFuncs if you want to hook internal functions used by DDL core!
|
|
{.$DEFINE HookInternalFuncs}
|
|
//----------------------------------------------
|
|
{$IFDEF FPC}
|
|
{$IFDEF CPU64}
|
|
{$IFNDEF CPUX64}
|
|
{$DEFINE CPUX64}
|
|
{$ENDIF !CPUX64}
|
|
{$ENDIF CPU64}
|
|
{$ASMMODE INTEL}
|
|
{$ENDIF FPC}
|
|
|
|
{$IFNDEF CPUX64}
|
|
{$IFNDEF CPUX86}
|
|
{$DEFINE CPUX86}
|
|
{$ENDIF !CPUX86}
|
|
{$ENDIF !CPUX64}
|
|
|
|
{$IFDEF DEBUG}
|
|
{$R+} // Range check On
|
|
{$ENDIF}
|
|
|
|
{$IFNDEF FPC}
|
|
{$IF CompilerVersion >17}
|
|
{$DEFINE CanInline}
|
|
{$IFEND}
|
|
{$IF CompilerVersion >=21}
|
|
{$DEFINE GenericsExist }
|
|
{$IFEND}
|
|
{$IF CompilerVersion >=23}
|
|
{$DEFINE DXE2UP }
|
|
{$IFEND}
|
|
{$IF CompilerVersion >=24}
|
|
{$DEFINE DXE3UP }
|
|
{$IFEND}
|
|
{$ENDIF !FPC}
|
|
|
|
{$IF DEFINED(UseInline) and DEFINED(CanInline)}
|
|
{$DEFINE MustInline}
|
|
{$IFEND}
|
|
|
|
{$IF DEFINED(GenericsExist) and DEFINED(UseGenerics)}
|
|
{$DEFINE MustUseGenerics}
|
|
{$IFEND}
|