Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Guardar WideString en archivo TXT (https://www.clubdelphi.com/foros/showthread.php?t=87261)

TiammatMX 04-12-2014 18:11:33

Guardar WideString en archivo TXT
 
Señores, una duda de primaria (sí, a veces me pasa)

Tengo éste código:

Código Delphi [-]
         if FileExists(Trim(wsPath)+'\'+Trim(wsNombArch)) then
            DeleteFile(Trim(wsPath)+'\'+Trim(wsNombArch));

         pTexto := wsCadenaSalida;
         System.AssignFile(fsArchivo,Trim(wsPath)+'\'+Trim(wsNombArch));
         System.ReWrite(fsArchivo);
         System.Write(fsArchivo, wsCadenaSalida);
         System.CloseFile(fsArchivo);

en Delphi XE2. wsCadena salida es una variable WideString, deseo guardarla en un archivo TXT y como tiene siglos que no lo hago, ya no recuerdo cómo. ¿Alguna ayudita, por favor?

TiammatMX 04-12-2014 22:24:04

Bueno, después de mucho buscar y eliminar el ofuscamiento mental, quedó así...

Código Delphi [-]
         if FileExists(Trim(wsPath)+'\'+Trim(wsNombArch)+'.txt') then
            DeleteFile(Trim(wsPath)+'\'+Trim(wsNombArch)+'.txt');

         fsArchivo := FileCreate(Trim(wsPath)+'\'+Trim(wsNombArch)+'.txt');
         FileWriteLine(fsArchivo,wsCadenaSalida);
         FileClose(fsArchivo);

...a veces me odio, por despistado.


La franja horaria es GMT +2. Ahora son las 15:06:51.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi