Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Gibt es MOD auch mit Real ausgabe? (https://www.delphipraxis.net/151051-gibt-es-mod-auch-mit-real-ausgabe.html)

lbccaleb 4. Mai 2010 11:39


Gibt es MOD auch mit Real ausgabe?
 
Hallo,

ich brüchte sowas wie den MOD Befehl, aber als ausgabe brauche ich ein Real wert, ohne das mit MOD alles nach dem Komma abschneidet.
Gibt es so ein Befehl in Delphi?

Oder muss ich mir das selber basteln??

dominikkv 4. Mai 2010 11:42

Re: Gibt es MOD auch mit Real ausgabe?
 
Das heißt du meinst einfach ein "geteilt durch"? -> /
MOD mit DIV verwechselt... :wall:

himitsu 4. Mai 2010 12:00

Re: Gibt es MOD auch mit Real ausgabe?
 
1. es gibt einen [Edit]-Button

2. Es heißt Ganzzahldivision. Also nein.


Real = Fließkommazahl
Integer = Ganzzahl

Im Notfall mußt'e dir halt selber was basteln:
für Rest := r mod x;
Delphi-Quellcode:
// für positive Zahlen:
rest := r - (Trunc(r / x) * x);
Delphi-Quellcode:
rest := r - (Int(r / x) * x);
Delphi-Quellcode:
rest := Frac(r / x) * x;
...

Klaus01 4. Mai 2010 12:06

Re: Gibt es MOD auch mit Real ausgabe?
 
Hallo,

meinst Du vielleicht so etwas?

Delphi-Quellcode:
function floatMod(zahl:double;divisor:integer):double;
begin
  //result := (frac(zahl / divisor)) * divisor;
  result := zahl - (trunc(zahl) div divisor) * divisor;
end;
Grüße
Klaus

lbccaleb 4. Mai 2010 12:46

Re: Gibt es MOD auch mit Real ausgabe?
 
Danke himitsu,
Zitat:

Zitat von himitsu
Delphi-Quellcode:
rest := r - (Trunc(r / x) * x);

Das klappt so wie ichs will!


Alle Zeitangaben in WEZ +1. Es ist jetzt 00:42 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz