StringGrid mit Zahlenfolge füllen

[Moombas]

So müsste es gehen, jedoch ungetestet.
Tipp: Nimm am besten bessere Namen für die Variablen. z.B.:

Delphi-Quellcode:

var
  Spalte, Zahl : Integer;
begin
  Zahl := 1;
  for Spalte := 1 to StringGrid1.ColCount - 1 do // das "- 1" fehlte bei dir, da du sonst über das Ziel hinaus gehst und somit einen Fehler produzierst.
  begin
    StringGrid1.Cells[Spalte, 0] := inttostr(Zahl);
    if Zahl = 7 then //Wenn 7 erreicht ist, wieder von vorne Anfangen
    begin
      Zahl := 1;
    end else  //Sonst: Zahl um 1 erhöhen
    begin
      inc(Zahl);
    end;
  end;
end;

[Jasocul]

Bitte die Schleife nur bis ColCount - 1 laufen lassen

[Kratos]

Vielen Dank für die schnelle Antwort!

Ich hab noch ein IntToStr() eingefügt und jetzt funktioniert es genau so, wie ich das möchte!
Danke dir!

VG
Kratos

EDIT:
@Jasocul
Moombas hatte es in seinem Kommentar im Code erwähnt. Ich hab es in meinen Code aber schon übernommen

[Moombas]

Zitat von Kratos:

Vielen Dank für die schnelle Antwort!

Ich hab noch ein IntToStr() eingefügt und jetzt funktioniert es genau so, wie ich das möchte!
Danke dir!

VG
Kratos

EDIT:
@Jasocul
Moombas hatte es in seinem Kommentar im Code erwähnt. Ich hab es in meinen Code aber schon übernommen

XD stimmt das hatte ich vergessen -.-

[Kratos]

@Uwe Raabe

Danke dir! So einen Lösungsansatz hatte ich gar nicht auf dem Schirm^^

[freimatz]

Hoi, ich fand den anderen lesbarer und würde den bevorzugen auch wenn er länger ist.

Wenn Du das doch nehmen willst dann schlage ich vor das entsprechend zu dokumentieren. Ein erfahrener Delphianer kommt zwar schnell drauf, für andere wäre es eine Hilfe.