DELPHI中怎么样读取数据表中的binary类型的字段付值到一个变量,
经过处理后写到数据表中,
应该怎么付值的?

解决方案 »

  1.   

    这是向数据库写入图象的,你试试改改如何向SQL Server中保存bmp图象以及读取
       delphi 图象存取 
      
    插入修改 保存图象
    bmTemp:=TBitmap.Create;
    ms:=TMemoryStream.Create;
    try
        qryFace.Close;
        qryFace.SQL.Clear;
        qryFace.SQL.Add('update video_face_image set face_image2=:face_image2');
        qryFace.SQL.Add(Format('where event_id=%d',[qryPrepare.FieldByName('event_id').AsInteger]));
        bmTemp.LoadFromFile('c:\face2.bmp');
        bmTemp.SaveToStream(ms);                       
        qryFace.Parameters.ParamByName('face_image2').LoadFromStream(ms,ftBlob);
    finally
        ms.Free;
        bmTemp.Free;
    end;如何在Image组件中显示
    bmTemp:=TBitmap.Create;
    ms:=TMemoryStream.Create;
    try
        TBlobField(qryFace.FieldByName('face_image1')).SaveToStream(ms);
        ms.Position:=0;  //最最重要的一点
        bmTemp.LoadFromStream(ms);
        imgFace1.Picture.Bitmap:=bmTemp;
    finally
        ms.Free;
        bmTemp.Free;
    end;
     
      

  2.   

    多谢 henreash(虫子) 的意见!
    我的目的是一个字符串如'123456'经过处理后保存到binary类型的字段,
    或者再从binary类型的字段读出来阿!
    是不是我的问题好偏了????
      

  3.   

    用TTable直接写就可以。
    table1.FieldByName('XX').asstring := Edit1.text
      

  4.   

    如果要用SQL写的话 , 如123
    insert into tablename (fieldname) values (0x0313233)
    转化成HEX就好了。