Thema: Delphi Positive Zahlen in negative umwandeln

Einzelnen Beitrag anzeigen

The Riddler
(Gast)

n/a Beiträge
 
#32

Re: Positive Zahlen in negative umwandeln

  Alt 29. Okt 2008, 17:52
Zitat von DeddyH:
Zahl := Succ(Zahl xor (1 shl Pred(SizeOf(Integer) shl 3) + MAXINT));
lol, sehr geil!
http://www.testriffic.com/resultfile..._the_prize.jpg