Vllt. hilft das weiter ...
http://www.delphipraxis.net/internal...ct.php?t=80704 Dann müsstest Du keine XOR-Funktion implementieren, sondern addierst trozdem dezimale Werte und lässt Dir das Ganze binär ausgeben. Aus dem binären Wert kannst dann Überträge rausholen, soviel wie Du willst.
Also:
Code:
1 + 1 = 2 dez.
= 10 bin.
= 0 bin. übertrag 1