Negativ-Zahl umwandeln in Positiv-Zahl

**Eppos**

Hallo zusammen,

folgendes Problem:

Ich habe ein Wert z.B. -1.000,00 Euro
Diesen möchte ich umwandeln in diesen Wert: 1.000,00 Euro

D.h. ich suche eine Funktion, die eine negativ-Zahl in eine Positiv-Zahl schreibt.

Hat Delphi so etwas schon?!

Vielen Dank,

Eppos

**Klaus01**

Hallo,

das sollte mit abs gehen.

Grüße
Klaus

**Aurelius**

markieren

Delphi-Quellcode:

			if Zahl < 0 then

  Zahl := Zahl * -1

Zum einen Klaus01 seine Lösung ist vollkommen richtig und die Logik ermittelt noch diese Lösung:

markieren

Delphi-Quellcode:

			if Wert < 0 then

  Wert := -Wert;

@xX0815Xx: Eine Multiplikation ist deutlich aufwendiger...

**Eppos**

abs?!
wo finde ich die Funktion

**Aurelius**

@ Eppos: DelphiHilfe öffnen und abs eintippen --> System.

@ Muetze: hast ja recht

**Eppos**

ok, danke alles klaro,

habs am anfang nicht gefunden, hat er mir irgendwie nicht angezeigt, aber jetzt!

**Laufi**

Hallo

Was auch noch gut ist ist:

markieren

Delphi-Quellcode:

			asm

  NEG Wert

end;

Liebe Grüsse
Laufi

**Hador**

Zitat von Laufi:

Was auch noch gut ist ist:

markieren

Delphi-Quellcode:

			asm

  NEG Wert

end;

Das macht aber nicht das selbe wie abs(wert).
Wenn man da eine positive Zahl reinpacke, kommt sie negativ raus.
So etwas wie abs() wäre:

markieren

Delphi-Quellcode:

			asm

  CMP wert, 0

  JG @ENDE

  NEG wert

  @ENDE:

end;

**Laufi**

ach so ok will er denn auch positive zahlen damit verwenden?

Aber dann sollte man es besser so machen nicht mit einen Jump!!!!!

markieren

Delphi-Quellcode:

			asm

  MOV Temp, Wert

  NEG Temp

  CMOVNS Wert, Temp

end

Liebe grüsse
Laufi

Negativ-Zahl umwandeln in Positiv-Zahl

Negativ-Zahl umwandeln in Positiv-Zahl

Re: Negativ-Zahl umwandeln in Positiv-Zahl

Re: Negativ-Zahl umwandeln in Positiv-Zahl

Re: Negativ-Zahl umwandeln in Positiv-Zahl

Re: Negativ-Zahl umwandeln in Positiv-Zahl

Re: Negativ-Zahl umwandeln in Positiv-Zahl

Re: Negativ-Zahl umwandeln in Positiv-Zahl

Re: Negativ-Zahl umwandeln in Positiv-Zahl

Re: Negativ-Zahl umwandeln in Positiv-Zahl

Re: Negativ-Zahl umwandeln in Positiv-Zahl

Forumregeln

Eppos Registriert seit: 7. Aug 2006 Ort: Heilbronn 523 Beiträge Delphi 11 Alexandria	#1 Negativ-Zahl umwandeln in Positiv-Zahl 28. Jan 2008, 12:59 Hallo zusammen, folgendes Problem: Ich habe ein Wert z.B. -1.000,00 Euro Diesen möchte ich umwandeln in diesen Wert: 1.000,00 Euro D.h. ich suche eine Funktion, die eine negativ-Zahl in eine Positiv-Zahl schreibt. Hat Delphi so etwas schon?! Vielen Dank, Eppos
	Zitat

Klaus01 Registriert seit: 30. Nov 2005 Ort: München 5.755 Beiträge Delphi 10.4 Sydney	#2 Re: Negativ-Zahl umwandeln in Positiv-Zahl 28. Jan 2008, 13:00 Hallo, das sollte mit abs gehen. Grüße Klaus Klaus
	Zitat

Aurelius Registriert seit: 29. Jan 2007 Ort: Erfurt 753 Beiträge Delphi 7 Personal	#3 Re: Negativ-Zahl umwandeln in Positiv-Zahl 28. Jan 2008, 13:01 markieren Delphi-Quellcode: if Zahl < 0 then Zahl := Zahl * -1 Jonas
	Zitat

Muetze1 (Gast) n/a Beiträge	#4 Re: Negativ-Zahl umwandeln in Positiv-Zahl 28. Jan 2008, 13:01 Zum einen Klaus01 seine Lösung ist vollkommen richtig und die Logik ermittelt noch diese Lösung: markieren Delphi-Quellcode: if Wert < 0 then Wert := -Wert; @xX0815Xx: Eine Multiplikation ist deutlich aufwendiger...
	Zitat

Eppos Registriert seit: 7. Aug 2006 Ort: Heilbronn 523 Beiträge Delphi 11 Alexandria	#5 Re: Negativ-Zahl umwandeln in Positiv-Zahl 28. Jan 2008, 13:05 abs?! wo finde ich die Funktion
	Zitat

Aurelius Registriert seit: 29. Jan 2007 Ort: Erfurt 753 Beiträge Delphi 7 Personal	#6 Re: Negativ-Zahl umwandeln in Positiv-Zahl 28. Jan 2008, 13:06 @ Eppos: DelphiHilfe öffnen und abs eintippen --> System. @ Muetze: hast ja recht Jonas
	Zitat

Eppos Registriert seit: 7. Aug 2006 Ort: Heilbronn 523 Beiträge Delphi 11 Alexandria	#7 Re: Negativ-Zahl umwandeln in Positiv-Zahl 28. Jan 2008, 13:12 ok, danke alles klaro, habs am anfang nicht gefunden, hat er mir irgendwie nicht angezeigt, aber jetzt!
	Zitat

Laufi Registriert seit: 21. Mär 2006 86 Beiträge	#8 Re: Negativ-Zahl umwandeln in Positiv-Zahl 28. Jan 2008, 14:03 Hallo Was auch noch gut ist ist: markieren Delphi-Quellcode: asm NEG Wert end; Liebe Grüsse Laufi
	Zitat

Laufi Registriert seit: 21. Mär 2006 86 Beiträge	#10 Re: Negativ-Zahl umwandeln in Positiv-Zahl 28. Jan 2008, 18:18 ach so ok will er denn auch positive zahlen damit verwenden? Aber dann sollte man es besser so machen nicht mit einen Jump!!!!! markieren Delphi-Quellcode: asm MOV Temp, Wert NEG Temp CMOVNS Wert, Temp end Liebe grüsse Laufi
	Zitat