解决方案 »

  1.   

    存储数据的一种方式,使用base64编码过的。
      

  2.   

    这些是客户给的一个xml格式,应该是图片内容。
    但是我如何进行转换为图片格式?
      

  3.   

    不像是Base64编码的!这个如果是图片你的就得找给你的XML文件的人了!靠猜是不可能的了!
      

  4.   

    看样子确实是图片,但是没见过这种编码的,不像是base64编码,不过可以尝试一下!用Base64解密保存为jpg文件试一下!
      

  5.   

    //将Base64字符串转化为图片信息--------------------------------------------------
    class function TImgOper.Base64ToPhoto(aPhotoStr: string;
      aImage: TImage): Boolean;
    var
      Ms: TMemoryStream;
      Ss: TStringStream;
      DecodeStr :DecodeFile;
      FilePath:string;
    begin
      Result := false;
      FilePath := 'C:\DecodeTemp.jpg';
      try
        Ms := TMemoryStream.Create;
        try
          Ss := TStringStream.Create(aPhotoStr);
          try
            DecodeStr := DecodeFile.Create;
            try           
              DecodeStr.MimeDecodeStream(Ss,Ms);  //解密字符到内存流中
              Ms.Position := 0;
              Ms.SaveToFile(FilePath);
              aImage.Picture.LoadFromFile(FilePath);
            finally
              DecodeStr.Free;
            end;
          finally
            Ss.Free;
          end;
        finally
          Ms.Free;
        end;
      except on e:exception do
        TSysOper.writeLog('将Base64字符串转化为图片信息,错误:' + e.Message);
      end;
    end;需要引用Encode和jpeg单元。尝试一下
      

  6.   

    DecodeStr :DecodeFile;这个是什么?
      

  7.   

    DecodeStr :DecodeFile;解密字符串类啊!在Encode单元里!
    好像是我搞错了,Encode单元是我们公司自己弄的一个单元文件!不是D自带的!你的可以从网上找找这个单元,因为我们也是从网上找的!
      

  8.   

    XML的内容都是字符,0000111111,看上去象二进制度数据。但它就是字符串,是由那些“图片”一类数据转换面来的字符串。 要想转换成原来数据,必须使用相同的转换算法(可逆)。
      

  9.   


    怎么转换为图片?将字符串转换成数字,用TFileStream或TMemoryStream直接写进去就是了
      

  10.   


    怎么转换为图片?
    你发个XML文件给我来试下,以前搞过的,要找下。
      

  11.   

    谢谢各位、已经找到方法,
    这些文本确实是jpg格式的16进制数据,必须把十六进制转换为二进制流。
    就可以得到图片。