Thema: Delphi Vorzeichen entfernen

Einzelnen Beitrag anzeigen

Benutzerbild von 3_of_8
3_of_8

Registriert seit: 22. Mär 2005
Ort: Dingolfing
4.129 Beiträge
 
Turbo Delphi für Win32
 
#11

Re: Vorzeichen entfernen

  Alt 29. Aug 2007, 23:08
@frank: Nicht nur exotisch, sondern auch falsch.

-1: $FFFFFFFF
Oberstes Bit auf 0 gesetzt:
$7FFFFFFF

Und $7FFFFFFF ist 2^31-1, also ungefähr 2 Mrd. und nicht, wie gewünscht, 1.

Wenn schon, dann müsste man es so machen:
if x<0 then x:=not x + 1; Oder, der schnellere Assembler-Weg:
Code:
cdq eax
xor eax, edx
sub eax, edx
Manuel Eberl
„The trouble with having an open mind, of course, is that people will insist on coming along and trying to put things in it.“
- Terry Pratchett
  Mit Zitat antworten Zitat