TBuf=array[0..255]   of   Byte;  
  const  
   
  Buf256_0:TBuf=(  
  $4D,$5A,$50,$00,$02,$00,$00,$00,  
  $04,$00,$0F,$00,$FF,$FF,$00,$00,  
  ......(省略)  
  Buf256_1:TBuf=(  
  $50,$45,$00,$00,$4C,$01,$03,$00,  
  $19,$5E,$42,$2A,$00,$00,$00,$00,  
  .....(省略)  
  $00,$00,$00,$00,$00,$00,$00,$00,  
  $00,$00,$00,$00,$00,$00,$00,$00,  
  $00,$00,$00,$00,$00,$00,$00,$00  
  );  
  procedure   SaveEXEToStream(SaveStream:TMemoryStream);  
  implementation  
   
  procedure   SaveEXEToStream(SaveStream:TMemoryStream);  
  begin  
  try  
  SaveStream.Write(Buf256_0,256);  
  SaveStream.Write(Buf256_1,256);  
  SaveStream.Write(Buf256_2,256);  
  SaveStream.Write(Buf256_3,256);  
  ........(省略)  
  SaveStream.Write(Buf256_214,256);  
  SaveStream.Write(Buf256_215,256);  
  except  
  end;  
  end;  
  end.  
  -------------------------------------------------------------------  
  上面是把一个16进制转为EXE.  
  我现在想替换原来的EXE文件要怎么做?  
  原则上是把EXE文件用16进制下打开.然后输入就可以@!  
  但是.太麻烦了。以后要经常改.到底怎么搞才行?  
  而且上面的是$00,$00,$00,$00,$00,$00,$00,$00    
  我们用16进制看到的并没有$号和逗号.一个个加?真的会累死人.!!!!  
   
  跪求高手指点一下...本人QQ:94215