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