Delphi-Quellcode:
if DSData.FieldByName('doc').IsBlob then
begin
doc := DSData.CreateBlobStream(DSData.FieldByName('doc'), bmRead);
//ts := DSData.CreateBlobStream(DSData.FieldByName('doc'), bmRead);
//doc := ts;
//ts.Free;
end;
Wenn ich auf ts verzichtet und direkt den TStream in das TStream Objekt der VST Struktur schreibe, funktioniert es.
Jetzt bekomme ich nur ein Memory Leak beim Beenden der Anwendung. Ich muss ja irgendwie, dass doc Element freigeben aber wie? Es ist ja in der VST Struktur.
Oder sollte ich ts wieder aktivieren aber als Globale Variable und beim Beenden wieder freigeben? Dieser Weg scheint mir aber eher schlecht programmiert.
Gruß
Sven