suche $OrDef - oder wie löst ihr das Problem

[Cappuccino]

Hallo,

genutzt wird D5, teilweise D6 oder 2007

Das Programm muss für diverse Geräte compiliert werden, die unterschiedliche Features haben.
Mit den Compilerdirektiven ist das nicht sonderlich schön lösbar,
{$ifdef MaschineA} xxxx {$endif}
{$ifdef MaschineB} xxxx {$endif}
{$ifdef MaschineC} xxxx {$endif}
hier müssen nun alle vorhandenen Maschinen eingetragen werden, auch


{$ifdef MaschineA}
{$else}
{$ifdef MaschineB}
{$else}
{$ifdef MaschineC}
{$else}
{$endif}
{$endif}
{$endif}

ist nicht wirklich der Hit



---> schöner wäre

{$ifdef MaschineA} {$OrDef MaschineB} {$OrDef MaschineC}
xxxx
{$else}
xxx
{$endif}

Geht so was - und wenn ja - wie?

Danke + Gruß
Tom

[jfheins]

Du könntest dir eine include Datei machen, die ungefähr so aussieht:

{$ifdef MaschineA} {$define AorBorC} {$endif}
{$ifdef MaschineB} {$define AorBorC} {$endif}
{$ifdef MaschineC} {$define AorBorC} {$endif}

{$ifdef MaschineA}
{$ifdef MaschineB}
{$ifdef MaschineC}
{define AandBandC}
{$endif}
{$endif}
{$endif}

Aber sowas

Zitat:

Zitat von Cappuccino

{$ifdef MaschineA} {$OrDef MaschineB} {$OrDef MaschineC}
xxxx
{$else}
xxx
{$endif}

Geht imho nicht ...

[nahpets]

Hallo,

ein Versuch:

Code:

{$ifdef MaschineA} {$define IstFuerAlleDa} {$endif} 
// MaschineA kann alles, was MaschineB kann, aber nicht umgekehrt.
// Spart ggfls. separate Behandlung von A und B
{$ifdef MaschineB} {$define IstFuerAlleDa} {$define IstFuerAUndB} {$endif} 
{$ifdef MaschineC} {$define IstFuerAlleDa} {$endif} 

{$ifdef MaschineA} 
xxxx
{$endif} 

{$ifdef MaschineB} 
xxxx
{$endif} 

{$ifdef MaschineC} 
xxxx
{$endif} 

{$ifdef IstFuerAUndB} 
xxxx
{$endif} 

{$ifdef MaschineC} 
xxxx
{$endif} 

{$ifdef IstFuerAlleDa}
xxxx
{$endif}

[nicodex]

Erst ab Delphi 6 werden CONDITIONALDEFINES unterstützt:

Delphi-Quellcode:

{$IF
  Defined(MaschineA) or
  Defined(MaschineB) or
  Defined(MaschineC)
}
//...
{$IFEND}

Davor helfen nur die o.g. Alternativen.

[Cappuccino]

danke, das mit dem conditional define habe ich gesucht, das passt.

Gruß
Tom