FTP | CCD | Buscar | Trucos | Trabajo | Foros |
|
Registrarse | FAQ | Miembros | Calendario | Guía de estilo | Temas de Hoy |
|
Herramientas | Buscar en Tema | Desplegado |
|
#1
|
||||
|
||||
Desempaquetar campos numéricos comprimidos de archivo
Hola a tod@s.
Necesito leer un fichero creado con btrieve para pasarlo a mi aplicación. Con la instrucción BUTIL saco los registros a un fichero de texto pero me encuentro con que los campos numéricos están empaquetados. Para los que conozcan el BASIC quiero recordar que se empaquetaban/desempaquetaban con la instrucción cvi/cvs mki/mks. ¿Hay alguna manera desde Delphi de poder leer y desempaquetar estos campos o me tendré que preparar un programita en BASIC (horror porque no me acuerdo de nada)? Dejo aquí un archivo de muestra por si a alguien le hace chiste y le echa un vistazo. Gracias y un saludo
__________________
Be water my friend. Última edición por newtron fecha: 18-01-2017 a las 19:32:30. |
#2
|
||||
|
||||
En torrys hay algunos componentes para acceder desde delphi a bases de datos btrieve/pervasive, a ver si te sirve.
También he encontrado esto, es libre. |
#3
|
||||
|
||||
Gracias, le echaré un vistazo y te cuento.
__________________
Be water my friend. |
#4
|
||||
|
||||
Parece que estos programas lo que hacen es algo similar al BUTIL que viene con las BTRIEVE que es generar un fichero de texto a partir del fichero original pero no me resuelve el problema de los números empaquetados.
Seguiremos buscando la forma.
__________________
Be water my friend. |
#5
|
||||
|
||||
"Números empaquetados", ¿te refieres a big endian y little endian?
Código:
unsigned long blockLength = *blockLengthPtr++ << 24; blockLength |= *blockLengthPtr++ << 16; blockLength |= *blockLengthPtr++ << 8; blockLength |= *blockLengthPtr; unsigned long dataLength = *dataLengthPtr++ << 24; dataLength |= *dataLengthPtr++ << 16; dataLength |= *dataLengthPtr++ << 8; dataLength |= *dataLengthPtr;
__________________
La otra guía de estilo | Búsquedas avanzadas | Etiquetas para código Únete al grupo Teaming clubdelphi | Colabora mediante Paypal Última edición por Casimiro Notevi fecha: 25-05-2012 a las 12:04:52. |
#6
|
||||
|
||||
Mira esta página, creo que ahí tienes la solución Y aquí un ejemplo sencillo, que en teoría funciona;
|
|
|
Temas Similares | ||||
Tema | Autor | Foro | Respuestas | Último mensaje |
Campos numericos | Alexandro | Tablas planas | 6 | 21-10-2008 17:21:09 |
Problemas al actualizar campos numéricos con ClientDataSet e IBX | PINO72 | Conexión con bases de datos | 0 | 17-03-2007 01:37:44 |
campos numericos en access | naker | Tablas planas | 1 | 08-10-2004 02:59:48 |
Máscaras para campos numéricos | jadelphi | Varios | 2 | 01-09-2004 08:53:06 |
Campos Numericos en DBEDITS | jfloro | OOP | 2 | 04-06-2003 11:40:22 |
|