いつも参考にしております。
現在Delphi XE、dbExpress、Oracle11GR2で開発を行っております。
dbExpressを使用してのBLOB保存保存方法ですが、下記のようにしてもエラーとなってしまいます。(BLOBデータ型はサポートしてません...)
CommandTextにINSERT文を記入し、パラメター項目'BB'のプロパティはblob型にしてあります.
どなたかよろしくお願いします。
var
BMap: TBitmap;
begin
BMap := TBitmap.Create;
FName := '印鑑.bmp';
FL := FileSearch(FName,'C:\');
BMap.LoadFromFile(FName);
try
SQLDataSet1.ParamByName('AA').asstring := 'Test';
BMap.LoadFromFile(FName);
SQLDataSet1.ParamByName('BB').Assign(BMap);
SQLDataSet1.ExecSQL(FALSE);
finally
FreeAndNil(BMap);
end;
END;
https://www.petitmonte.com/bbs/answers?question_id=5221
を参照すればどうでしょうか?
HOta様
ありがとうございます。解決しました。
解決しました。
助かりました。感謝。
ツイート | ![]() |