[Resolvido] Função que retorna um valor randômico

http://forum.imasters.com.br/public/style_emoticons/default/closedeyes.gif

function Random [(Range: Integer)];

var

 Num: Integer;

 

 begin

 

 Randomize;

 

 for Num := 1 to 50 do begin

 

 *{ escreve na janela em posições randômicas }*

 

Canvas.TextOut(Random(Width), Random(Height), 'Olá!');

 

end;

 

 end;

Obs.: 0<=X<Range