Falls der Blob leer bleibt oder der Anfang fehlt:
Delphi-Quellcode:
oFS.Position := 0;
qInsert.Params[0].AsStream.CopyFrom(oFS, -1);
Eventuell auch prüfen, ob man den Blob vorher Clear(en) sollte. (falls vorher mehr Daten drin waren, was neu geschrieben werden)