FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
#1
|
||||
|
||||
Importar de Txt sin delimitadores de registro
Estoy tratando de importar a una base de Datos desde un fichero Txt en el que los registros no están delimitados( ni siquiera con retorno de carro).
Como le indico al readln que tiene que leer 720 caracteres para cada registro? |
#2
|
|||
|
|||
no utilices readln, utiliza read, que te lee caracter a caracter, asi solo tienes que meterlo en un bucle que te cuente los caracteres que quieras leer
espero te sirva |
#3
|
||||
|
||||
Si te interesa, te recomiendo que pruebes un componente de mi página llamado TFileReader
Saludos!
__________________
delphi.com.ar Dedique el tiempo suficiente para formular su pregunta si pretende que alguien dedique su tiempo en contestarla. |
#4
|
||||
|
||||
Cita:
|
#5
|
|||
|
|||
Ahora, al hacer el readln, en que tipo de variable almacenabas los datos leidos?
De todas maneras una variable de tipo string te lo permite, sino un AnsiString Nos leemos |
#6
|
||||
|
||||
¡Buen día a todos!
Apicito: ¿Podrías mostrarnos una muestra de ese archivo de texto y la estructura de campos destino? Agradecería una copia detallada a mi cuenta de correo electrónico. ¡Hasta luego! Al González . Desarrollador de componentes a la medida. |
#7
|
||||
|
||||
Cita:
La estructura de la tabla a donde la cargo es: CREATE TABLE "RUSTICA2002" ( "POLIGONO" INTEGER, "PARCELA" INTEGER, "UNIDFISCAL" INTEGER, "NOME" CHAR(60), "NIF" CHAR(10), "NIFTIPO" CHAR(1), "COMUNIDAD" CHAR(1), "COMUNEROS" INTEGER, "PORCENTAXE" DECIMAL(5, 2), "PARAXE" CHAR(20), "TITULO" CHAR(2), "SUPERFICIE" INTEGER, "VALOR" DECIMAL(10, 2), "ALTA" CHAR(4) ); Podrías explicarme por que te interesa este tema? |
#8
|
||||
|
||||
Cita:
¿Podrías darnos una muestra de un par de esos registros de 720 caracteres para darnos una idea más clara de cómo es el formato origen? Con respecto a tu pregunta original, creo que sería conveniente tener una variable de tipo Record con una estructura de campos igual a la de los registros a leer y luego utilizar las funciones Reset y BlockRead para leer cada registro, o mejor aún, con un objeto de clase TFileStream. Espero esto sea de utilidad. Seguimos en contacto. Al González . |
|
|
|