Delphi. Работа с <рандомным числом> R. Ответ найден

[koudelka]

Ребятки! Привет всем! Подскажите!
Число, выпавшее рандомно необходимо использовать далее для загрузки определенного изображения, к примеру,
если выпадает рандомно число 5, то загружается 5ое изображение в папке, ну или 5.jpg
Как это устроить?

function TForm1.GetWord: String; 
Var
   R: Integer;
   Fname: String;
begin
    randomize;
    R := random(ListBox1.Items.Count - 1) + 1;    //генерируем рандомное число
    IF R=5 THEN   //если, к примеру, выпало число 5
    Begin
    Fname:=ExtractFilePath(Application.ExeName)+'photo\' + '5.jpg';  //вот здесь вместо 5.jpg нужно задать зависимость от выпавшего числа R
    form1.Image2.Picture.LoadFromFile(Fname);
    end;   
end;

=========ответ найден===========

Fname:=ExtractFilePath(Application.ExeName)+'photo\' + IntToStr(R) + '.jpg';