delphi - FireDAC 图像 BLOB 作为 FDStoredProc 参数

Question

我在通过 FireDAC 存储过程将图像插入数据库时​​遇到问题。

我尝试使用内存流

ms:=TMemoryStream.Create;
ms.Position:=0;
image1.Bitmap.SaveToStream(ms);
ms.Position:=0

FDStoredProc1.ParamByName('@img').LoadFromStream(ms,ftBlob);

但这以AccessViolation.

然后我尝试从路径直接加载图像

FDStoredProc1.ParamByName('@img').LoadFromFile('C:\f\1.jpg',ftBlob);

但这以错误消息“流读取错误”结束！

有谁能够帮我 ？非常感谢 ！