delphi - FDStoredProc パラメータとしての FireDAC 画像 BLOB

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

しかし、これはエラーメッセージ「ストリーム読み取りエラー」で終わります!

誰でも私を助けることができますか？どうもありがとう ！