Hallo,

Die Stringgrid Spalten werden fortlaufend nummeriert.

markieren

Code:

Stringgrid.Cells[0,i] :=i+1;

so kann ich Stringgrid in der vordersten Spalte von oben nach unten
die Zahlen 12345... Schreiben.
----------
aber wie kann ich quartalsweise die Spalten durschnummerieren
so wie ich haben möchte: 3 6 9 12... usw.

danke!

Quick 'n Dirty:

markieren

Delphi-Quellcode:

Zahl := Succ(i) * 3 mod 12;
if Zahl = 0 then
  Zahl := 12;
Stringgrid.Cells[0,i] := Zahl;

Danke!

Sorry,
wie Soll ich "Zahl" definieren?
als...

Nimm doch Cardinal, allerdings musst Du dann auch IntToStr beim Zuweisen an die Zellenbeschriftung verwenden, habe ich leider vergessen.

ok ...Danke!