Einzelnen Beitrag anzeigen

daNiii

Registriert seit: 10. Nov 2008
98 Beiträge
 
Turbo Delphi für Win32
 
#7

Re: Zufallszahl mit Kommerstellen

  Alt 7. Mär 2009, 14:21
Danke für eure Zahlreichen Antworten!
vorher habe ich noch nicht gewusst, was Trunc bedeutet.
ich hatte jedoch noch einen 2. Fehler.
nämlich: Man muss zuerst randomize; schreiben bevor man die Zufallszahl bildet.
Für die Richtigstellung, hier noch einmal die richtige Lösung
Delphi-Quellcode:
procedure Form1.Zufallszahl_bilden();
var
Zufallszahl: extended;
Wert: string;
begin

Zufallszahl:= (random(1));
randomize;
Wert:= FormatFloat('0.00', Zufallszahl);
showmessage(floattostr(Wert);
end;
Danke!
  Mit Zitat antworten Zitat