Elegante Lösung gesucht, 3 Boolean-Werte, nur einer darf gesetzt sein

[BenjaminH]

Zitat von TiGü:

Das kann man ja mit einer einfachen if-Abfrage vorher prüfen.

oder
bOK := (B1 xor B2 xor B3) and not (B1 and B2 and B3);