将它存为一个磁盘文件,再装入TImage.

解决方案 »

  1.   

    存为一个磁盘文件是可以,不过我觉得这样不是很好,而且我想可以显示几种格式,如BMP和JPG,这样当保存为文件是的扩展名不知怎样定
      

  2.   

    我也快到也做这步了。
    dbimage不行吗?
      

  3.   

    dbimage不能显不JPG的, 只能显示BMP
      

  4.   

    多谢。
    我也快搞到图片来了。
    以前是用bmp。
    现在一般来拍照都用jpg了。
    对了rx里头的控件应该可以。
      

  5.   

    you just use TImage,use the save to file methord to save the data into a temperory file,then load it to TImage,just as Jiker said
      

  6.   

    bigban() 为什么非得这么搞????
      

  7.   

    bigban() :如果我的图像格式不定, 那么保存时的文件名怎样定呢(指扩展名)?
      

  8.   

    用过了,但把图像赋给IMAGE时就出错
      

  9.   

    文件扩展名肯定是要存到数据库中的
    用ADOQuery或着Query,
    (Query.FieldByName('FileSource') AS TBlobField).SaveToFile(Query.Field('FileName').AsString);
      

  10.   

    我的作法是声明一个TJpegImage对象,然后,把数据库里的图片的字段用assign赋给对象,然后再用TImage的canvas.draw画出来。
      

  11.   

    yymmme(yymm),我就想你那种方法,如果用建立文件再删除有一些问题的,我不喜欢那样, 可以给个代码看看吗?
      

  12.   

    加入一个字段记录是bmp还是jpg,读出时在根据情况处理,我这样用过今天时间太短,不加代码了。
      

  13.   

    可以用TJpegImage作中间代换,再放入Image中。也可以ClipBorad来代换。
      

  14.   

    我用TJpegImage作中间代换时,当放入Image时就出错,
    请问用clipBorad怎样做的呢
      

  15.   

    procedure TForm1.Button3Click(Sender: TObject);
    var jpeg1:TjpegImage;
    begin
      jpeg1:=TjpegImage.Create;
      jpeg1.Assign(AdoTable1.FieldByName('photo'));  image1.Canvas.Draw(0,0,jpeg1);
      jpeg1.Free;
    end;image1是TImage对象
      

  16.   

    jpeg1.Assign(AdoTable1.FieldByName('photo'));这一句出错,不能把一个TBlobField复制到jpeg1中
      
      

  17.   

    这是把图片存入数据库,照片字段用image型。procedure TForm1.BitBtn1Click(Sender: TObject);
    begin
    if OpenpictureDialog1.Execute then
    begin
      adoTable1.Edit;
     (adoTable1.FieldByName('photo') As TBlobField).LoadFromFile(Openpicturedialog1.FileName);
     adoTable1.Post;end;end;
      

  18.   

    多谢yymmme(yymm),图片我已经存进去了,现在只是显示问题
      

  19.   

    我想是字段类型的问题,我用ado+sql server,是完全可以显示的,我已经实验过了,字段用image型。
      

  20.   

    哦,我是用ado+access2000的,字段类型用ole
      

  21.   

    我用access97试过了,完全可以的!