1.请问如何把图片文件(如*.bmp)转化为二进制文件2.再把图片二进制文件转化为图片文件

Question

如题

Answer 1

SaveToStream()
LoadFromStream()

Answer 2

BMP文件难道不是二进制文件吗？？？

Answer 3

bmp文件本来就是 二进制文件！

Answer 4

你是不是想加密图片 ？找我就行
[email protected]

Answer 5

我要的是可以看得懂的二进制或十六进制文件，并能相互转化，数据像＊.dfm中保存的数据

Answer 6

显示（从数据库中得来）
      with query1 do
      begin
        close;
        sql.Clear;
        sql.Add('select p_image from t_park where p_no=:p_no');
        parambyname('p_no').asstring:=pstring(tv.selected.Data)^;
        open;
      end;      pr_query_detail(pstring(tv.selected.Data)^);
      if (query1.RecordCount<>0) and (not(query1.FieldByName('p_image').IsNull)) then
      begin
        try
          m_JpegStream:=TMemoryStream.Create;
          (Query1.FieldByName('p_image') as tblobfield).savetostream(m_JpegStream);
          image1.Picture.Graphic:=nil;
          image1.Picture.Graphic:=TJpegImage.Create;
          m_JpegStream.Position:=0;
          image1.Picture.Graphic.LoadFromStream(m_JpegStream);
        finally
          m_JpegStream.Free;
        end;
      end
      else image1.Picture.Graphic:=nil

Answer 7

*.bmp不就是二进制文件吗？
任何文件不都是二进制文件？或者说都是文本文件！

Answer 8

能看得懂的0101....我要把他们保存到数据库中的Text型的字段中

Answer 9

bmp文件本来就是二进制文件！

Answer 10

早说嘛，这个简单：
...
ADOTable1.Edit;
...
TBlobField(ADOTable1.FieldByName('Text')).LoadFromFile('图片文件名');
...
ADOTable1.Post;

Answer 11

存：
ADOTable1.Edit;
...
TBlobField(ADOTable1.FieldByName('Text')).LoadFromFile('图片文件名');
...
ADOTable1.Post;
取：
TBlobField(ADOTable1.FieldByName('Text')).SaveToFile('图片文件名');