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;