Foros Club Delphi - Importar un archivo separado por comas

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- Tablas planas (https://www.clubdelphi.com/foros/forumdisplay.php?f=20)

- - Importar un archivo separado por comas (https://www.clubdelphi.com/foros/showthread.php?t=121)

mivaler

06-05-2003 18:29:52

Importar un archivo separado por comas

Hola... soy nuevo por aquí...

quiero importar un archivo plano separado por comas (csv) en un TTable.

al establecerle al Ttable la ubicacion del archivo y activar el Ttable, este solo me muestra 1 campo FIELD1 y en el toda la linea con los datos separados por comas.

es logico que lo que deseo es separar los campos pero no lo he logrado.

soy nuevo en desarrollo en delphi y quisera que alguien me ayude en esta duda...

agradeceré sus aportes.

mivaler

06-05-2003 23:13:27

el codigo que utilizo...

procedure Tcarga.Button1Click(Sender: TObject);
var dbpath : String;
begin
dbpath := AppPath+'files';
open.InitialDir := dbpath;
if open.Execute then
begin
ti.DatabaseName := dbpath;
ti.TableName:=open.Filename;
ti.Open;
ti.Last;
end;
end;

delphi.com.ar

07-05-2003 01:21:34

Hola Miguel, he subido el componente que faltaba en http://www.delphi.com.ar/vcl/index.html, espero que te sirva.
Para instalarlo solo tienes que agregar el archivo pas a algún paquete y el DCU debe estar en el search path.

Suerte!

mivaler

07-05-2003 15:29:56

no lo he podido instalar.

Hola delphi.com.ar

hago lo normal para instalarlo, Component > Install Component

Unit File Name : RegFileReader.pas.

el DCU ubicado en un Search Path ( $(DELPHI)\Lib )

un paquete existente...

y voila... Error..

[Error] RegFileReader.pas(21): Undeclared identifier: 'TFileReader'

una cosa... me tomé el atrevimiento de poner un corchete que parece que faltaba en

RegisterComponents('FireSoft', [TFileReader]);

lo habias colocado como

RegisterComponents('FireSoft', [TFileReader);

dime... que estoy haciendo mal o que???

sin más...

delphi.com.ar

07-05-2003 16:30:53

No entiendo como es que quedó esa Unit en el Zip, debería ser algo así:

Código:

unit RegFileReader;



interface



procedure Register;



implementation



uses

  Classes, FileReader;



procedure Register;

begin

  RegisterComponents('FireSoft',  [TFileReader]);

end;



end.

mivaler

07-05-2003 17:48:20

Otro inconveniente...

Hola delphi.com.ar

bueno... esta vez... como que si como que no...

nuevo error... miralo desde esta optica... soy tu conejillo de indias y así probamos si se puede instalar el componente o no..

[/b][Fatal Error] RegFileReader.pas(18): File not found: 'Strfuncs.dcu'[/b]

trate de utilizar el componente sin instalarlo, llamandolo desde uses y me sale el mismo error

que opinas????

delphi.com.ar

07-05-2003 18:23:49

Y... si... ¿te acordás cuando te dije que me tenía que tomar un tiempo para armar un paquete con el componente?... bueno, eso es lo que tengo que hacer con un poco mas de tiempo...

Te mando un mail cuando lo tenga!

mivaler

20-05-2003 18:48:52

ahora si me funciono y lográ hacer la conversión...

Gracias hombre

La franja horaria es GMT +2. Ahora son las 05:16:25.