Schleifen

[Grishnak]

Da innerhalb der for-Schleife mehrere Befehle abgearbeitet werden sollen, müssen diese in einem begin..end-Block stehen:

Delphi-Quellcode:

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

oder (kürzer):

Delphi-Quellcode:

begin
  randomize;
  for i:=1 to 5 do
    StringGrid1.Objects[Random(5)+1, Random(5)+1]:=pointer(1);
end;