Delphi - como creo archivo de texto con 2 columnas y Nfilas

 
Vista:

como creo archivo de texto con 2 columnas y Nfilas

Publicado por marco osorio (38 intervenciones) el 18/04/2001 06:11:14
quisieran que me ayudaran a crear un archito txt que contenga datos formados en 2 columnas y n filas de largo algo asi:

0
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:como creo archivo de texto con 2 columnas y Nfi

Publicado por José Oronas (89 intervenciones) el 20/04/2001 02:35:53
Tenes dos formas, la tradicional de pascal

Var
F : TextFile ;
Begin
AssignFile(F,'C:\Prueba.txt');
{$i-}
rewrite(F);
{$I+}
If IOResult <> 0
Then
Begin
..... Mensaje de Error ......
Exit ;
End ;
For I = 1 to 10 D0
WriteLn('Columna 1'+#9+'Columna 2'
// Cambia #9 (Tab) por lo que necesites como
// Separador de Columnas
CloseFile(F) ;
End ;

Otra es usar un tStrings ;

Var
Lista : tStrings ;
Begin
Lista := tStringList.Create ;
For 1 to 10 Do
Lista.Add('Columna1'+#9+'Columna2') ;

Lista.SaveToFile('C:\Prueba.txt');
Lista.Free ;
End ;

Saludos.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar