Danke für deine schnelle Antwort.
Die Lösung der Hammer:
Delphi-Quellcode:
if fIlbSol <> NIL then begin
with fIlbSol do
lSeek := TSeek.Create( FldPK, TheTable.FldIlbSolKurz.AsString );
try
fIlbSol.Seek( [ lSeek ] );
finally
lSeek.Free;
end;
Durch das "with" bekommt er irgendwie ein anderes Seek zu packen. Als ich "fIlbSol." vor das Seek gesetzt hatte, konnte er so compilieren.
Danke, danke, danke