Foros Club Delphi

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

trabuc 30-11-2004 11:40:57

Importar archivo de texto
 
Hola
Alguien me podria decir como se hace en delphi para importar un archivo de texto, y usar meter el texto de respectivas lineas en variables?

Gracias y un saludo a todos

Neftali [Germán.Estévez] 30-11-2004 12:33:39

Cita:

Empezado por trabuc
...como se hace en delphi para importar un archivo de texto, y usar meter el texto de respectivas lineas en variables?

Hay varias formas de hacerlo; Una es utilizando TextFile y segun la ayuda de Delphi éste sería un ejemplo:

Código Delphi [-]
var 
  F: TextFile;
  S, var1: string;
begin
    AssignFile(F, 'C:\MiFichero.txt'); // Cargar el fichero
    Reset(F);         // Inicializar
    Readln(F, S);    // Leer la primera linea
    var1 := S;                     // guardarle en una variable    
    CloseFile(F);   // cerrar el fichero
end;

La otra que a veces se utiliza (si el fichero es pequeño) es cargarlo en un TStrings; Y ahí manipularlo. Algo así:

Código Delphi [-]
var
  TS:TStrings;
  var1, var2:Strings;
begin
  TS := TStringList.Create(nil);  // crear el TStrings
  try
    TS.LoadFromFile('C:\MiFichero.txt'); );   // cargar el fichero
    var1 := TS.Strings[0];  // primera linea
    var2 := TS.Strings[1];  // segunda línea
    ...
  finally
    TS.Free;
  end;

jeronimo 30-11-2004 12:57:57

Convertir achivos de texto.
 
Si es un archivo de texto separado por coma, esta Commatext(en delphi4).-

trabuc 01-12-2004 11:40:22

Ya esta echo
 
Gracias, ya me va bien


La franja horaria es GMT +2. Ahora son las 23:49:55.

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