Fehler beim Dynamischen Array?

[X-Dragon]

Stimmt die Idee mit dem schätzen ist auch nicht schlecht, da ich ja ungefähr weiß was normal als Ergebnis rauskommt.

Da es mit dem kopieren des Objektes aber leider nicht funktioniniert(das werd ich mir demnächst nochmal genauer anschauen), hab ich jetzt alles umgestellt und speichere die Einträge in einer Stringliste, deshalb fällt das dynamische Array wie auch der Zähler erstmal weg.

@Motzi
Danke für den Tip, hab ich gerade gemacht .

Delphi-Quellcode:

var
  i, j : Integer;
  objsuch : TTermine;
  objids : TStrings;
begin
  objids := TStringList.Create;
  InitTermine(True); // aktualisieren der TermineListe

  for i := 0 to TermineListe.Count -1 do
  begin
    objsuch := TTermine(TermineListe.Objects[i]);
    if (objsuch.SettWert = auft.SettWert) and
       (objsuch.Notitz = auft.Notitz) then
    begin
      objsuch.LW := True; // Zugriff auf Datensatz für andere User sperren
      objsuch.Speichern;
      ObjIDs.AddObject(objsuch.ID, objsuch); // speichern der ID und des Objektes
    end;
  end;