const
  FileName: string = 'c:\a.bmp';
var
  flstrmTemp: TFileStream;
  strTemp: string;
begin
  flstrmTemp := TFileStream.Create(FileName, fmOpenRead);
  SetLength(strTemp, flstrmTemp.Size);
  flstrmTemp.Read(strTemp[1], flstrmTemp.Size);
  flstrmTemp.Free;
end; 
请问高手,以上代码中,strtemp字符串中的内容已经是二进制的代码了,但它是字符串类型的, 如何将字符串中的内容取出并传递给一个二进制流变量啊,如:pbyte????????

解决方案 »

  1.   

    help me!!!!
    为什么这段时间里总是没人能给我解答啊?!!!
      

  2.   

    怎么我刚才的回答不见了?
    type
    pByte = array of Byte;
    var
    img:pByte;
    allocmem(img,flstrmTemp.Size);
    flstrmTemp.Read(img&, flstrmTemp.Size);大概这意思了,你看行吗?
      
      

  3.   

    pByte = array of Byte;
    img:pByte;
    flstrmTemp := TFileStream.Create(gifname, fmOpenRead);
    img:=AllocMem(flstrmTemp.Size);
    flstrmTemp.Read(img&, flstrmTemp.Size);
    编译上面的代码时提示:‘&’为非法字符,请指教!我们的想法是想将gifname文件以二进制的方式写入到img变量中!