谢谢各位大侠,请问jennykiller,怎么样替换呢,我用以下的方法提示流读取失败:
var
strStream:TStringStream;
fs:TMemoryStream;
begin
..........//省略
strStream:=TStringStream.Create('');
strStream.CleanupInstance;
strStream.Seek(0,sofromBeginning);
strStream.CopyFrom(fs,fs.size);
stringreplace(strStream.DataString,'<-Application_Title->',SuiEdit2.Text,[rfReplaceAll]);
fs.Seek(0,sofrombeginning);
fs.CopyFrom(strStream,strStream.size);
fs.SaveToFile(changefileext(savedialog1.filename,'.exe'));
end;