StringGrid ID erstellen

[strom]

hallo,

möchte im Grid automatisch eine id erstellen!
leider wird immer nur eine 1 gesetzt! :-(

Delphi-Quellcode:

var
i, zaehler : integer;
begin
 StringGrid1.RowCount := StringGrid1.RowCount + 1;
    for i := StringGrid1.RowCount - 0 downto StringGrid1.FixedRows + 1 do
    begin
     StringGrid1.Rows [i].Assign (StringGrid1.Rows [i - 1]);
     StringGrid1.Rows [StringGrid1.FixedRows].Clear;
     StringGrid1.Cells [1, StringGrid1.FixedRows] := IntToStr(Zaehler +1); // diese Zeile meine ich!
     StringGrid1.Cells [2, StringGrid1.FixedRows] := FormatDateTime ('dd:mm:yyyy', Now);
     StringGrid1.Cells [3, StringGrid1.FixedRows] := FormatDateTime ('hh:nn:ss', Now);
     StringGrid1.Cells [4, StringGrid1.FixedRows] := ('Log * '+ Edit6.Text +' * User ID * '+ Edit3.Text);
 end;
end;

[Sir Rufo]

Na da hast du aber Glück, dass dabei tatsächlich überhaupt eine 1 herauskommt. Eine lokale Variable ist nicht initialisiert, da kann alles mgliche drin stehen.

Dann schreibst du den neuen Wert auch gar nicht in die Variable zurück, wie soll da also was hochgezählt werden.

Und eine lokale Variable hat beim nächsten Aufruf auch wieder irgend einen beliebigen Wert (s.o.)

[Dejan Vu]

... und ein begin/end fehlt noch.

[strom]

Habt Ihr auch ein Beispiel?

[Perlsau]

Ein Beispiel wofür?

[Luckie]

Beispiel wozu? Den Zähler zu einem Feld der Klasse machen und den neuen Wert im Zähler merken.

[DeddyH]

Zitat:

Delphi-Quellcode:

for i := StringGrid1.RowCount - 0 downto StringGrid1.FixedRows + 1 do

Diese Schleife solltest Du vielleicht mal erläutern. Und was soll die besagte ID sein, einfach eine Zeilennummerierung?

[himitsu]

Beispiel?

Ja, sehe Post #2.

Dort steht genau drin, war du anders machen mußt.
* Zählvariable nicht lokal deklarieren
* Zählvariable nicht vergessen hochzuzählen (+1 oder Inc)
* Variable eventuel am Anfang nicht vergessen zu initialisieren (Programmstart)

Und gefälligst die Warnmeldungen und Hinweise des Compilers lesen und vorallem diese Probleme auch beheben.

[edit] ich sollte mal F5 benutzen und jemand sollte die RedBox wecken. :stupid:

[strom]

genau,

suche eine einfache Zeilennummerierung im StringGrid ...

[himitsu]

Also einfach "Zaehler" vergessen und direkt

Delphi-Quellcode:

i + irgendeinOffset

benutzen? :roll: