Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Cadena en archivo de texto (https://www.clubdelphi.com/foros/showthread.php?t=53215)

muppett 14-02-2008 05:02:24

Cadena en archivo de texto
 
Podrian ayudarme, no se como guardar una cadena de caracteres en un archivo de texto automaticamente, la cadena se visualiza en un memo

dec 14-02-2008 05:30:01

Hola,

Código Delphi [-]
Memo1.SaveToFile('C:\archivo.txt');

muppett 15-02-2008 00:37:14

Otra duda
 
Muchas gracias por la ayuda, resolvio gran parte de mi problema ahora, si abro el archivo me aparece esa cadena pero al momento d cerrarlo y guardar otra cadena me borra la anterior:( como puedo hacer para que me alnacene n cantidd de cadenas y no las borre cada voy a agregar una nueva????

ZayDun 15-02-2008 13:58:24

Podrias cargar el archivo en un memo por ejemplo, e ir agregandole todas las cadenas que quieras al Memo.

Cita:

Memo1.LoadFromFile('Archivo.txt');
Memo1.Lines.add ('Cadena de texto');
Memo1.SaveToFile('C:\Archivo.txt');

ixMike 15-02-2008 14:28:48

jeje, ¿nuevo en esto de la programación, eh? :D

Veamos, veamos....

El componente TMemo tiene una propiedad llamada Lines, de tipo TStrings. Esa propiedad es la que contiene el texto del TMemo.

El tipo TStrings posee un método para guardar el texto que contiene en un archivo, llamado SaveToFile. Claro, si guardas el texto "Hola, qué tal?" en el archivo "saludo.txt", pero el archivo "saludo.txt" ya existía, entonces lo que tenía se pierde, y se guarda lo nuevo, "Hola, qué tal?".

Entonces, tienes dos formas de solucionar esto:

1ª. Que tu programa visualice en el Memo todo el texto que ya ha sido guardado antes. Para eso, tienes el método de TStrins LoadFromFile. ¿Adivinas para qué sirve? :D
2ª. Crear tu propio objeto TStrings temporal para añadirle el texto. Sería así:

Código Delphi [-]
var
  Lista: TStrings;
begin
  Lista:=TStringList.Create; //Creamos el objeto;
  Lista.LoadFromFile('C:\archivo.txt'); //Cargamos en Lista el archivo.
  Lista.AddStrings(Memo1.Lines); //Añadimos a Lista todo el texto del Memo
  Lista.SaveToFile('C:\archivo.txt'); //Guardamos el texto en el archivo.
  Lista.Free; //Borramos el objeto de la memoria
end;


Véase que, aunque el objeto está declarado como TStrings, se crea como TStringList. Esto siempre tienes que hacerlo así, ya que TStrings es una clase abstracta y... bueno, ni yo mismo sé lo que significa, pero sé que hay que hacerlo así.

Espero que te sirva de ayuda. Para más dudas, mira la ayuda de Delphi sobre TMemo, TStrings.. y todo lo que necesites.


Salu2 ;)

muppett 15-02-2008 23:23:49

Muy agradecida
 
Muchisimas gracias ixMike :) la verdad funciono de maravilla, ahora otra duda es complicado guardar esa informacion en una hoja de calculo y separar la informacion en dferentes columnas????:D

ixMike 16-02-2008 00:18:10

¿Hoja de cálculo? ¿Excel? Sí, desde luego eso ya es más complicado. Lo siento, ahí ya no puedo ayudarte :( pero si buscas por los foros encontrarás información.

Salu2.

muppett 19-02-2008 21:32:53

Problema con el archivo
 
Por que cuando abro el archivo me aparece las primeras dos lineas repetidas????????


La franja horaria es GMT +2. Ahora son las 04:06:34.

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