Schleifen

[n0b0dy]

das ist doch 5 mal das selbe oder?

Delphi-Quellcode:

Randomize;

for i := 0 to 4 do
begin
  t := Random(5) + 1;
  t2 := Random(5) + 1;
  StringGrid1.Objects[t2, t] := Pointer(1); 
end;

EDIT: wohl zu langsam gewesen