dbExpressにてBLOB

解決


通りすがり  2011-03-18 22: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 23:13:52  No: 40269  IP: [192.*.*.*]

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

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

編集    削除
通りすがり  2011-03-18 23:40:26  No: 40270  IP: [192.*.*.*]

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

編集    削除
通りすがり  2011-03-18 23:41:56  No: 40271  IP: [192.*.*.*]

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

編集    削除