Einzelnen Beitrag anzeigen

Benutzerbild von Uwe Raabe
Uwe Raabe

Registriert seit: 20. Jan 2006
Ort: Lübbecke
11.475 Beiträge
 
Delphi 12 Athens
 
#5

AW: StringGrid mit Zahlenfolge füllen

  Alt 8. Nov 2019, 13:28
Geht auch etwas kürzer:
Delphi-Quellcode:
for i := 1 to StringGrid1.ColCount - 1 do
  begin
    StringGrid1.Cells[i,0] := IntToStr(((i - 1) mod 7) + 1);
  end;
Uwe Raabe
Certified Delphi Master Developer
Embarcadero MVP
Blog: The Art of Delphi Programming
  Mit Zitat antworten Zitat