Es gibt seit Jahren schon den Wunsch einer PUSH-Funktion, also vorher Zustand speichern und nachher wiederherstellen, aber neeeeeeeeeee
Vor allem, da diese Prüfung nur mit Einbuchstabigen Options funktioniert.
Nja, innerhalb eigener Units setze ich sowas zu Beginn der
Unit und ein zurücksetzen ist (meistens) unnötig,
ansonsten mach ich das UNDEF auch zu Beginn ... immer alles in sich Konsistent, ohne dass man auf Vorhergehendes/Nachfolgendes achten muß.
Delphi-Quellcode:
{$UNDEF USES_OVERFLOW_CHECKING} // oder mit Else (vor allem beim Einzeiligen)
{$IFOPT Q+}
{$DEFINE USES_OVERFLOW_CHECKING}
{$ENDIF}
{$Q-}
Value := Value + Add;
{$IFDEF USES_OVERFLOW_CHECKING}
{$Q+}
{$ENDIF}
Delphi-Quellcode:
//{$UNDEF USES_OVERFLOW_CHECKING} {$IFOPT Q+} {$DEFINE USES_OVERFLOW_CHECKING} {$ENDIF}
{$IFOPT Q+} {$DEFINE USES_OVERFLOW_CHECKING} {$ELSE} {$UNDEF USES_OVERFLOW_CHECKING} {$ENDIF}
{$Q-}
Value := Value + Add;
{$IFDEF USES_OVERFLOW_CHECKING} {$Q+} {$ENDIF}