If - Abfrage variabel gestalten ?

[jfheins]

Zitat von Highttower:

warum binär mit xor vergleichen????

Wieso binär? xor ist genauso ein boolscher Operator wie and, or und not

Zitat:

Schöner ist doch:

Delphi-Quellcode:

procedure Calculate(a: Boolean)
begin
If (DM_Geraete.Query1['RW_NUMMER'] <> Null) AND ((DM_Geraete.Query1['RW_VERSCHROTTUNG'] = Null) AND a) then 
begin 

end;
end;

Es geht hier doch nur um einfache Boolsche Algebra -> Komplementärgesetze
HTH
Tobi

Aha. und wenn a false ist, dann ist das ergebnis der query eh uninteressant ... ?

Das mit dem xor passt schon. Wenn man false übergibt, bleibt die Logik unverändert und wenn man true übergibt, wird die Logik umgekehrt
http://de.wikipedia.org/wiki/Xor