Reemplazar un texto en un archivo con Inno Setup
Hola, tengo un problema con la sustitución de un texto en un archivo de texto con Inno Setup (basado en Delphi).
Mi código:
procedure FileReplaceString(const FileName, searchstring, replacestring: string);
var
fs: TFileStream;
S: string;
begin
fs := TFileStream.Create(FileName, fmOpenread or fmShareDenyNone);
try
SetLength(S, fs.Size);
fs.ReadBuffer(S[1], fs.Size);
finally
fs.Free;
end;
{ the compiler stops here with: unknown identifier 'StringReplace' }
S := StringReplace(S, SearchString, replaceString, [rfReplaceAll, rfIgnoreCase]);
fs := TFileStream.Create(FileName, fmCreate);
try
fs.WriteBuffer(S[1], Length(S));
finally
fs.Free;
end;
end;
Descubrí que tengo que usarStringChange()
, en cambio pero no sé cómo usarlo con mi código. No sé mucho sobre Delphi o Inno Setup. Espero que puedas ayudarme.