Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Leer fichero (https://www.clubdelphi.com/foros/showthread.php?t=31895)

rocio84 21-05-2006 00:21:48

Leer fichero
 
Hola:
La aplicación que estoy haciendo debe leer de un fichero, pero el fichero tiene una estrunctura determinada, por ejemplo:

POINTS 4 4 5
1 2 3
3 2 1
...

El problema es que no se si existen en delphi las rutinas para leer los datos y meterlos en variables, porque por ejemplo, yo necesitaria leer solo los tres numeros que siguen a 'POINTS', en C yo lo hacia con 'scanf':

scanf("POINTS %d %d %d",p1,p2,p3);

¿Alguien sabe si hay alguna rutina que se le corresponda?

Gracias

Lepe 21-05-2006 10:45:06

Código Delphi [-]
var Lista, Linea:TStringList;
     
begin
Lista := TStringList.Create;
Linea := TStringList.Create;

Lista.LoadFromFile('c:\ldjsflakjdlf');
Linea.DelimitedChar := ' '; // el espacio
for i:=0 to Lista.Count-1 do
begin
  linea.DelimitedText := Lista[i];
  ShowMessage('La cadena a decodificar: '+ Lista[i]);
  for j:= 0 to Linea.Count-1 do
  begin
     ShowMessage('Decodificada la Linea en trozos: '+linea[j]);
end;
freeandnil(lista); // destruimos la lista de memoria.
freeandnil(linea);

Hasta donde yo sé , no existe nada como Scanf.

Ese código carga en Lista todo el archivo, y ahora desglosa cada línea, el bucle interior (el de variable j) mostrará:
Points
4
4
5

Para la primera línea.

Saludos


La franja horaria es GMT +2. Ahora son las 13:09:54.

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