Mit FireDac auf bytea Attribut unter PostgreSQL schreiben

[himitsu]

Nja, man könnte mal nachsehn, was der Setter im AsStream genau macht.
"Ich" würde ja garnicht den Stream direkt übernehmen, sondern im Setter nur den Inhalt des Streams kopieren.

Ansonsten gäbe es auch noch CopyFrom

Delphi-Quellcode:

iFStreeam.Position := 0;  // bei TMemoryStream oder wo es nicht vorne steht 
QWrite.Params[1].AsStream.Clear;  // entsprechend dem QWrite.Params[1].AsStream.Position:=0; , aber auch inkl. .AsStream.Size, falls schon (längere) Daten drin waren

QWrite.Params[1].AsStream.CopyFrom(iFStreeam);