Delphi-PRAXiS - Einzelnen Beitrag anzeigen - Elegante Lösung gesucht, 3 Boolean-Werte, nur einer darf gesetzt sein

**Valle**

Wie wäre denn:
b4 := Ord(b1 and True) + Ord(b2 and True) + Ord(b3 and True) = 1;

Hast du das mal ausprobiert? Könnte mir vorstellen, dass es wegoptimiert wird.

Valle Registriert seit: 26. Dez 2005 Ort: Karlsruhe 1.223 Beiträge	#31 AW: Elegante Lösung gesucht, 3 Boolean-Werte, nur einer darf gesetzt sein 24. Feb 2016, 14:03 Zitat von Jasocul: Wie wäre denn: b4 := Ord(b1 and True) + Ord(b2 and True) + Ord(b3 and True) = 1; Hast du das mal ausprobiert? Könnte mir vorstellen, dass es wegoptimiert wird. Valentin Voigt BOFH excuse #423: „It's not RFC-822 compliant.“ Mein total langweiliger Blog
	Zitat