Club Delphi  
    FTP   CCD     Buscar   Trucos   Trabajo   Foros

Retroceder   Foros Club Delphi > Principal > Varios
Registrarse FAQ Miembros Calendario Guía de estilo Temas de Hoy

Grupo de Teaming del ClubDelphi

Respuesta
 
Herramientas Buscar en Tema Desplegado
  #1  
Antiguo 04-12-2014
Avatar de TiammatMX
TiammatMX TiammatMX is offline
Miembro
 
Registrado: jun 2006
Ubicación: Universo Curvo\Vía Láctea\Sistema Solar\Planeta Tierra\América\México\Puebla\Heróica Puebla de Zaragoza\Jardines de San Manuel\Home
Posts: 746
Poder: 18
TiammatMX Va camino a la fama
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?
__________________
Felipe Eduardo Ortiz López. Delphi programmers does it recursively...

"Un programador, es un creador de universos en donde sólo él es responsable. Universos de complejidad prácticamente ilimitada que se puede crear en forma de programas de ordenador." - Joseph Weizenbaum.

Témele a los profetas... y a aquellos que están listos para morir por "la verdad", ya que como regla general hacen morir a muchos otros con ellos, frecuentemente antes que ellos, y a veces en lugar de ellos. — Umberto Eco
Responder Con Cita
  #2  
Antiguo 04-12-2014
Avatar de TiammatMX
TiammatMX TiammatMX is offline
Miembro
 
Registrado: jun 2006
Ubicación: Universo Curvo\Vía Láctea\Sistema Solar\Planeta Tierra\América\México\Puebla\Heróica Puebla de Zaragoza\Jardines de San Manuel\Home
Posts: 746
Poder: 18
TiammatMX Va camino a la fama
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.
__________________
Felipe Eduardo Ortiz López. Delphi programmers does it recursively...

"Un programador, es un creador de universos en donde sólo él es responsable. Universos de complejidad prácticamente ilimitada que se puede crear en forma de programas de ordenador." - Joseph Weizenbaum.

Témele a los profetas... y a aquellos que están listos para morir por "la verdad", ya que como regla general hacen morir a muchos otros con ellos, frecuentemente antes que ellos, y a veces en lugar de ellos. — Umberto Eco
Responder Con Cita
Respuesta



Normas de Publicación
no Puedes crear nuevos temas
no Puedes responder a temas
no Puedes adjuntar archivos
no Puedes editar tus mensajes

El código vB está habilitado
Las caritas están habilitado
Código [IMG] está habilitado
Código HTML está deshabilitado
Saltar a Foro

Temas Similares
Tema Autor Foro Respuestas Último mensaje
Guardar archivo en delphi Maria85 Internet 1 04-02-2009 13:12:40
Guardar Archivo De Texto Ðαяισš Varios 5 19-01-2009 06:57:18
Guardar jpg en archivo XML zemog76 OOP 13 27-06-2005 02:16:47
Guardar Archivo BlueSteel Varios 10 01-04-2005 00:43:08


La franja horaria es GMT +2. Ahora son las 21:01:25.


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