Moin Leute
Ich habe ein Problem mit einem Speicherleck.
Seek( [ TSeek.Create( FldPK, TheTable.FldIlbSolKurz.AsString ) ] );
Ganz klar, dass das Objekt nicht wieder freigegeben wird. So habe ich das mal so umgebaut:
Delphi-Quellcode:
var
lSeek : TSeek;
lSeek := TSeek.Create( FldPK, TheTable.FldIlbSolKurz.AsString );
try
Seek( [ TSeek(lSeek) ] );
finally
lSeek.Free;
end;
Sieht auf den ersten Blick korrekt aus. Nur, die aufzurufende Funktion ist so deklariert:
function Seek( SeekFields : Array of TSeek ) : boolean;
Jetzt erzählt er mir andauernd "Ordinaltyp erforderlich". Ich habe schon einiges probiert. Als TObject, als Pointer.... Keine Ahnung, wie ich die Stelle jetzt umsetzen soll. Kann mir jemand von euch weiterhelfen?
Stefan