was ist JCL?
Oh Schande auf mein Haupt. Es lag an folgenden Code:
Delphi-Quellcode:
for x := 0 to ComponentCount - 1 do
if Components[x] is TDataSource then
TDataSource(Components[x]).Dataset := Nil;
PatientQry.Close; <---- Diese Zeile hat den Fehler verursacht.
Ich mache es nie wieder.