Erstell mal schnell ein neues Projekt, packe einen Button auf das Formular und schreibe folgenden Code in das
OnClick Ereignis des Buttons
Delphi-Quellcode:
procedure TForm1.Button1Click(Sender: TObject);
var
dblZufallszahl: Double;
begin
dblZufallszahl := Random * 100;
ShowMessage(FloatToStr(dblZufallszahl));
end;
...
...