Zufallszahl mit Kommerstellen

[daNiii]

Was mache ich bloß falsch? Mein Ziel ist es eine Zufallszahl zu erstellen zwischen 0 und 1.
Das Ergebniss soll in Kommerstellen ausgegenen werden. (zB. 0,9786523)

Hier ist mein Programmieransatz:

Delphi-Quellcode:

procedure Form1.Zufallszahl_bilden();
var
Zufallszahl: extended;
Wert: string;
begin

Zufallszahl:= trunc(random(1) +0);
randomize;
Wert:= FormatFloat('0.00', Zufallszahl);
showmessage(floattostr(Wert);
end;

Derzeit wird in meinem showmessage stets die Zahl 0,00 ausgegeben.
Ich hoffe mir kann jemand helfen und mich auf meinen Fehler aufmerksam machen.
Danke!