{CONDITIONALS} nach methoden namen

[KodeZwerg]

Hallo, ich habe mal zwei Fragen

Ist es legitim wenn man conditionals so einsetzt?

Delphi-Quellcode:

function Foobar: Boolean;
{$IF (DEFINED(WIN32) or DEFINED(WIN64) or DEFINED(MSWINDOWS)) AND NOT DEFINED(WINDOWS)}
  {$DEFINE WINDOWS}
{$ENDIF}
begin
  Result := {$IF DEFINED(WINDOWS}}True{$ELSE}False{$ENDIF};
end;

falls dies legitim ist hier die zweite Frage,
ist es dann nur lokal innerhalb der methode?

[himitsu]

Legitim .... njoar,

aber warum nicht "sicher" machen?
Wenn hier von irgendwas Anderem vorher WINDOWS definiert ist, auch wenn es kein WIN32/WIN64/MSWINDOWS ist, dann bliebe es dennoch WINDOWS, weil kein UNDEF vorhanden.

Delphi-Quellcode:

//{$IF (DEFINED(WIN32) or DEFINED(WIN64) or DEFINED(MSWINDOWS))}
//{$IF DEFINED(MSWINDOWS)}
{$IFDEF MSWINDOWS}
  {$DEFINE WINDOWS}
{$ELSE}
  {$UNDEF WINDOWS}
{$ENDIF}

Wenn WIN32 oder WIN64, dann ist es eh immer MSWINDOWS.


Natürlich ist sowas immer nur lokal (bis zum Ende der Unit),

aber warum "WINDOWS" nicht direkt mit MS?

OK, fand es auch immer nervig ... es heißt ja auch nicht GGANDROID oder APMACOS

[Uwe Raabe]

Legitim ist das auf jeden Fall. Gültig ist es, wie Frank schon erwähnt hat, bis zum Ende der Unit oder bis es explizit wieder abgeschaltet wird. Im Gegensatz zu lokalen Variablen gibt es bei Conditionals keinen Scope auf Methoden.

[KodeZwerg]

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!!

[KodeZwerg]

Zitat von himitsu:

aber warum "WINDOWS" nicht direkt mit MS?

Weil ich dieses define in sehr vielen meiner methoden verwende. Auch wenn es doppelt gemoppelt ausschaut (: