DBにバイナリで格納したJPGデータを取得するには


DIA  2011-02-08 15:19:23  No: 39995  IP: 192.*.*.*

お世話になっております。
現在、Delphi2007とSQLServer2008を使用したアプリを作っております。
DBにVarBinary(MAX)で格納された画像データ(JPG)を取得
する方法を試しているのですが、細かい方法が不明で詰まって
しまいました。
現在作成してみたサンプルはこんな感じです。
DBから取得したデータをTimageのpictureに設定するものです。
※use にjpgは追加済み。接続はDBEXPRESS


procedure TForm1.Button1Click(Sender: TObject);
var
    jpg: TJpegImage;

begin
    jpg := TJPEGImage.Create;
    SQLConnection1.Connected := True;
    SQLQuery1.Close;
    SQLQuery1.Open;
 
    //↓ここでエラーになります。
    jpg.Assign( SQLQuery1.FieldByName('colimg').AsBCD);

    Image1.Picture.Graphic := jpg;

    SQLQuery1.Close;

互換性エラーとなっているのですが、変換方法がよくわかりません。
ご存知の方いらっしゃいましたらご教授願えませんでしょうか。
よろしくお願いいたします。

編集 削除
とおりすがり  2011-02-08 18:29:18  No: 39996  IP: 192.*.*.*

過去ログを見ましょう

編集 削除