Disculpar de nuevo, me complila pero no consigo hacer. Tengo un fichero archivo.txt con varias cifras entre las que se hayan 22.150 y quiero sustituirlas por 28.250 (o lo que sea cualquier cosa...) y guardarlo como archivo2.txt.
Este código me compila y me genera el fichero archivo2.txt pero no me guarda el cambio.
Gracias de antemano y disculpar las molestias.
M
Código Delphi
[-]
procedure TForm2.Button1Click(Sender: TObject);
var
I: integer;
ss : TStringList;
begin
ss := TStringList.Create;
ss.LoadFromFile('c:\xxx\archivo.txt');
for I := 0 to (ss.count -1) do
ss.Text := StringReplace(ss.text,'22.150','28.250''',[rfReplaceAll]);
ss.SaveToFile('c:\xxx\archivo2.txt');
end;
end.