dbExpressにてBLOB

解決

通りすがり 2011-03-18 13:52:54 No: 40268 IP: 192.*.*.*

いつも参考にしております。
現在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;

編集削除

HOta 2011-03-18 14:13:52 No: 40269 IP: 192.*.*.*

https://www.petitmonte.com/bbs/answers?question_id=5221

を参照すればどうでしょうか？

編集削除

通りすがり 2011-03-18 14:40:26 No: 40270 IP: 192.*.*.*

HOta様
ありがとうございます。解決しました。

編集削除

通りすがり 2011-03-18 14:41:56 No: 40271 IP: 192.*.*.*

解決しました。
助かりました。感謝。

編集削除