Autor Beitrag
Cyborgmillenium
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 25



BeitragVerfasst: Di 25.06.02 16:40 
Ja, hallo.
Habe ein Problem.
Ich muss eine Kommazahl trennen.
Wenn die Zahl 23,98 steht soll daraus die Zahl 23 und die Zahl 0,98 werden. Wäre nett, wenn ihr mir eine schnelle und einfache Lösung sagen könntet.
Thx Cyborgmillenium
Phoenix
Hält's aus hier
Beiträge: 11

Vista
RAD Studio 2007 Prof. / VS '08
BeitragVerfasst: Di 25.06.02 16:54 
Nur kurz und schmerzlos:

such mal in der Delphi-Hilfe nach den Funktionen
ausblenden Quelltext
1:
2:
function Int(x : real) : real;
function Frac(X: Extended): Extended;


Tun genau das was Du brauchst. Unit System.

Grüßle,

Sebastian

_________________
Sebastian P.R. Gingter
Matthias
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 121



BeitragVerfasst: Di 25.06.02 16:55 
Hallo,

1. Die Funktion Trunc schneidet die Nachkommastellen ab
2. Für die Nachkommastellen brauchst Du dann nur noch die
Differenz bilden


ciao

Matthias
Cyborgmillenium Threadstarter
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starontopic star
Beiträge: 25



BeitragVerfasst: Di 25.06.02 17:22 
Danke, aber könntet ihr mir noch ein Beispiel geben?
Torsten
ontopic starontopic starontopic starontopic starontopic starontopic starontopic starhalf ontopic star
Beiträge: 160



BeitragVerfasst: Di 25.06.02 17:53 
Moinsen!

Schon mal die Hilfe zu den oben genannten Funktionen angeschaut?
Dort steht sogar ein Beispiel bei.

Beispiel für ganzzahligen Wert:
ausblenden Quelltext
1:
Label1.Caption:=FloatToStr(int(19.34));					


Nachkommastellen:
ausblenden Quelltext
1:
Label2.Caption:=FloatToStr(19.34 - int(19.34));					


Grüße

Torsten
MathiasH
ontopic starontopic starontopic starontopic starontopic starontopic starofftopic starofftopic star
Beiträge: 699

WinXP, Win98SE, Debian, Win95
D5 Stand, D6 Prof
BeitragVerfasst: Di 25.06.02 17:58 
Na wenn du meinst :

ausblenden Quelltext
1:
2:
3:
4:
5:
6:
7:
var
i1, : Integer;  //ausgabe
r, r1: Real; //Eingabe+Ausgabe
begin
i1 := trunc(r);
r1 := frac(r);
end;

fertig

Mathias

_________________
"Viel von sich reden, kann auch ein Mittel sein, sich zu verbergen."
Friedrich Nietzsche