Cadena en archivo de texto

[muppett]

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

[dec]

Hola,

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

[muppett]

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]

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

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

[ixMike]

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

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?
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]

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????

[ixMike]

¿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]

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