Ver Mensaje Individual
  #6  
Antiguo 27-12-2008
Avatar de Lepe
[Lepe] Lepe is offline
Miembro Premium
 
Registrado: may 2003
Posts: 7.424
Reputación: 29
Lepe Va por buen camino
Siguiendo el ejemplo de Caro
Código Delphi [-]
var
 sl : TStringList;
begin
  sl := TStringList.Create;
  sl.LoadFromFile('C:\Fite.txt');  //grabamos
  //hacer lo que sea
  sl.Free;

No sé, pero si quieres guardar valores para después leerlo, quizás te interese más un TIniFile, consulta la ayuda, un ejemplo sería:
Código Delphi [-]
uses IniFiles;

var ini:TiniFile;
   leido:integer;
begin
  ini := TiniFile.Create('c:\file.ini');
  ini.WriteInteger('MiSeccion', 'MiClave', 1);
  

  leido := ini.ReadInteger('MiSeccion', 'MiClave', 0); // si no existe, por defecto un cero.

  ini.Free;

El resultado sería un archivo como este:
Código:
[MiSeccion]
MiClave = 1
Saludos
__________________
Si usted entendió mi comentario, contácteme y gustosamente,
se lo volveré a explicar hasta que no lo entienda, Gracias.
Responder Con Cita