Ver Mensaje Individual
  #3  
Antiguo 15-07-2003
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Reputación: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
Si en tu versión de Delphi viene la función StringReplace yo propondría esto:

Código:
var
  Archivo: TStringList;
  S: String;

begin
  Archivo := TStringList.Create;
  try
    Archivo.LoadFromFile('c:\lolo.txt');
    S := StringReplace(Archivo.Text, '"', '', [rfReplaceAll]);
  finally
    Archivo.Free;
  end;
end;
// Saludos
Responder Con Cita