Delphi: Randomize десятичных чисел

[Sianessa]

В обещм такая проблема: мне нужно сделать заполнение StringGrid случайными числами от 0 до 1 (желательно до сотых, например 0,7 или 0,25 и т.д.
А нашла только обычный, подскажите пожалуйста, как.
Вот мой код:

procedure TForm1.Button2Click(Sender: TObject);
var i,j,n: integer;
begin
 randomize;

    for i:=0 to StringGrid1.ColCount - 1 do
          for j:=0 to StringGrid1.RowCount - 1 do
             begin
             for n:=0 to 1  do
             begin
               StringGrid1.Cells[i,j]:=inttostr(random(0;1));
             end;
             end;
end;

[Ybn2]

Сообщение от Sianessa

В обещм такая проблема: мне нужно сделать заполнение StringGrid случайными числами от 0 до 1 (желательно до сотых, например 0,7 или 0,25

Я пишу с ходу, поэтому проверяйте:

procedure TForm1.Button2Click(Sender: TObject);
var i,j,n: integer;
begin
 randomize;

    for i:=0 to StringGrid1.ColCount - 1 do
          for j:=0 to StringGrid1.RowCount - 1 do
             begin
             for n:=0 to 1  do
             begin
               StringGrid1.Cells[i,j]:=FloatToStr(Random(100)/100);
             end;
             end;
end;

[Sianessa]

Ybn2, работает!
Большое вам спасибо!