Einzelnen Beitrag anzeigen

strom

Registriert seit: 23. Aug 2008
Ort: Keine Ergebnisse gefunden
290 Beiträge
 
#1

StringGrid ID erstellen

  Alt 31. Mär 2015, 20:35
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;

Geändert von strom (31. Mär 2015 um 20:46 Uhr)
  Mit Zitat antworten Zitat