Mit FireDac auf bytea Attribut unter PostgreSQL schreiben

[bnreimer42]

Danke. So geht es.

Ich halte fest:

QWrite.Params[1].AsStream := iFStreeam; geht nicht, aber

QWrite.Params[1].LoadFromStream(iFStreeam,ftBlob); funktioniert wie erwartet.

Über das Warum mache ich mir später Gedanken.

Unterschied der beiden Aufrufe lt. Doku ist noch, dass bei ersterem der Stream an FireDAC übergeben würde, bei zweiterem muss man den Stream selber freigeben.

[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);