Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Funktion MOD und DIV mit Strings verwenden... (https://www.delphipraxis.net/31118-funktion-mod-und-div-mit-strings-verwenden.html)

MadMax4525 4. Okt 2004 16:36


Funktion MOD und DIV mit Strings verwenden...
 
Hallo wie ihr vielleicht bemerkt bin ich neu hier und habe mal folgende Frage:

und zwar brauche ich von zwei Zahlen(in die Editfelder können Ganze Zahlen aber auch Kommawerte eingegeben werden) den DIV & MOD Wert! Mit Integer ist das ja kein Problem nur geht das ja nicht oder!? Die Zahlen haben höchstens drei Stellen nach dem Komma!!!
Wie kann ich den das ganze mit Real Zahlen machen???

Vielen dank schon mal!!!

rantanplan99 4. Okt 2004 16:39

Re: Funktion MOD und DIV mit Strings verwenden...
 
[oh]function StrToFloat(const S: string): Extended;[/oh]

edit:
[oh]function Trunc(X: Extended): Int64;[/oh]
damit schneidest du halt einfach die nachkommastellen ab.

edit #2: *g* bin irgendwie vergesslich heute
oder wenn sie Zahl wie du sagst max. 3 Nachkommastellen haben, dann multipliziere die Zahl doch einfach mit 1000, wende dann sein DIV und MOD an (dort die zahlen auch mit 1000 multiplizieren). Und die Ergebnisse dann halt zum schluss durch 1000 devidieren. Weiss zwar nicht ob das mathematisch richtig ist, aber vielleicht kommt was sinnvolle dabei raus. *g*

alcaeus 4. Okt 2004 16:41

Re: Funktion MOD und DIV mit Strings verwenden...
 
Hi MadMax4525,

erstmal herzlich willkommen in der DP.
Du kannst die div und Mod-operatoren nicht auf Fließkommazahlen anwenden. Evtl. musst du einen anderen Weg finden.

Greetz
alcaeus

JasonDX 4. Okt 2004 16:50

Re: Funktion MOD und DIV mit Strings verwenden...
 
na ja, div würd mit kommazahlen ca. so aussehn:
Delphi-Quellcode:
function fdiv(a, b: real): real;
begin
  result := trunc(a / b);
end;
und das mod so:
Delphi-Quellcode:
function fmod(a, b: real): real;
begin
  result := a - b * fdiv(a, b);
end;
(theoretisch müssts klappen, habs aber net probiert....)

MadMax4525 4. Okt 2004 23:19

Re: Funktion MOD und DIV mit Strings verwenden...
 
Danke schon mal für die ganzen Antworten,habe mal letzteres von Chimaira ausprobiert und funktioniert super!!! DANKE


Alle Zeitangaben in WEZ +1. Es ist jetzt 16:49 Uhr.

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