Darf ich nochmal vergleichen? Deine 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;
meine Lösung:
Delphi-Quellcode:
procedure Form1.Zufallszahl_bilden();
var
zufallszahl: extended;
begin
//Randomize bereits "aktiviert"
zufallszahl := random;
showmessage(floattostr(zahl);
end;
welche macht sich besser?