Delphi-Quellcode:
function Foobar: Boolean;
{$IF DEFINED(WINDOWS)}{$DEFINE RESTORE}{$ENDIF}
{$IF (DEFINED(WIN32) or DEFINED(WIN64) or DEFINED(MSWINDOWS)) AND NOT DEFINED(WINDOWS)}
{$DEFINE WINDOWS}
{$ELSE}
{$UNDEF WINDOWS}
{$ENDIF}
begin
Result :=
{$IF DEFINED(WINDOWS}}True
{$ELSE}False
{$ENDIF};
{$IF DEFINED(RESTORE) AND NOT DEFINED(WINDOWS)}{$DEFINE WINDOWS}{$ELSE}{$UNDEF WINDOWS}{$ENDIF}
{$IF DEFINED(RESTORE)}{$UNDEF RESTORE}{$ENDIF}
end;
In diese Richtung wird es sich bewegen.
Danke für Eure Hilfe!!