Crear una Grid con numeros aleatorios ¿Como le hago?

[aragorneuf]

No pues no he podido crearlo, ¿alguien me puede echar una mano con el codigo?

[roman]

Sería interesante que nos describieras aquí los intentos que has hecho para sobre ellos trabajar.

// Saludos

[aragorneuf]

Bueno pues en realidad no llevo mucho por que no encuentro como relacionar el random con los cuadritos de ls stringgrid.

¿Alguien sabe como hacerle?

De antemano Gracias

[roman]

La función Random te devolverá un número entero mientras que las celdas del StringGrid aceptan cadenas de caracteres. Lo único que tienes que hacer es convertir el resultado de Random a String usando IntToStr.

// Saludos

[aragorneuf]

Ya quedo, esto fue lo que hice:

  
procedure TForm1.B_TClick(Sender: TObject);
var
cols, reng, numero, mayor: integer;
begin
randomize;
mayor:=0;
for cols:=0 to 9 do
for reng:=0 to 9 do
begin
Numero:=random(101);
SG_1.cells[cols,reng]:= inttostr(Numero);
if numero > mayor then
 mayor:= numero;
end;
showmessage(inttostr(Mayor));
end;
end.

Gracias a todos por la ayuda.