Преглед изворни кода

Use USE_WINDOWS_OLE_FUNCTIONS macro to avoid build failure for win16 OS target

Pierre Muller пре 4 месеци
родитељ
комит
bfa16c0b32
1 измењених фајлова са 1 додато и 1 уклоњено
  1. 1 1
      packages/rtl-objpas/src/inc/varutilh.inc

+ 1 - 1
packages/rtl-objpas/src/inc/varutilh.inc

@@ -73,7 +73,7 @@ function VariantToWideString(const VargSrc : TVarData) : WideString;
 function VariantToAnsiString(const VargSrc : TVarData) : AnsiString;
 function VariantToShortString(const VargSrc : TVarData) : ShortString;
 
-{$ifdef MSWINDOWS}
+{$ifdef USE_WINDOWS_OLE_FUNCTIONS}
 function VarDateFromStr(const strIn: POleStr; alcid: DWORD; dwFlags: Longint; out dateOut: Double): HRESULT; stdcall; overload;
 function VarDateFromStr(const strIn: POleStr; alcid: DWORD; dwFlags: Longint; out dateOut: TDateTime): HRESULT; stdcall; overload;
 {$endif}