Hallo Taladan,
dass mit dem exklusiven Zugriff schlägt häufig fehl, weil man in Delphi bereits Active auf True setzt und dann beim Starten des Programmes aus der
IDE eine weitere Zugriffsinstanz erzeugt. Du solltest deshalb Active auf False lassen und beim Programmstart, oder auch später, die Tabelle mit Open aus dem Programm heraus öffnen.
In deinem CalcFields versetzt du ja die aktuelle Position in Tabelle 1, dadurch erzeugst du eine Endlosschleife. Du kannst einfach eine weiter Instanz auf Tabelle 1 anlegen(z.B. SuchTabelle) und diese in Calcfields benutzen. Die Position in Tabelle1 bleibt dann unverändert.