Creación de tipos de archivo

[[escafandra]]

Empezado por ecfisa

Hola escafandra.
.....
¿ Se te ocurre algún modo ? Por que de esa forma es muchísimo más simple.

Si, La cabecera debe empezar con un WORD que contiene el tamaño de la misma. Inmediatamente un DWORD que contiene el tamaño del archivo y seguidamente un array de CHAR que contiene el nombre. Detras viene el archivo binario. Esto se repita por cada archivo.

Para recuperarlo leemos le primer WORD (2 Bytes) y tras elle leemos la cantidad de Bytes del resto de esa cabecera. El primer DWORD (4 Bytes) sabemos que es el tamaño del archivo, Sabemos la longitud del FileName restando el tamaño de la cabecera menos 6. Ya solo queda leer el archivo cuyo tamaño conocemos... Repetimos...

Si el tamaño de algún archivo es mayor de 4Gb podemos guardarlo en in int64 en vez de en un DWORD.
Podemos simplificarlo algo si reservamos un espacio fijo en la cabecera para el nombre de archivo, en ese caso sobra guardar el tamaño de la cabecera pues siempre será el mismo y conocido. Pero si queremos guardar el Path entero este ultimo sistema desaprovecha espacio.

No tengo un delphi a mano, no puedo realizar un ejemplo, pero deciros que algo similar ya implementé en C hace tiempo.

Saludos.


PD me voy de vacaciones y no podré seguir el hilo...

[ecfisa]

Empezado por escafandra

Si, La cabecera debe empezar con un WORD que contiene el tamaño de la misma. Inmediatamente un DWORD que contiene el tamaño del archivo y seguidamente un array de CHAR que contiene el nombre. Detras viene el archivo binario. Esto se repita por cada archivo.

Hola.

Buenisimo, no se me había ocurrido...

Gracias y que disfrutes el descanso.

[Tortuguica]

Gracias, escafandra y ecfisa. Perdón por mi escueto agradecimiento de antes, pero venía de la playa y estaba rendido :-/ Voy a ver cómo me sale la propuesta de escafandra. Un saludo a los dos.

[Tortuguica]

Ah, y gracias también a ti, Casimiro Notevi, claro (la playa me ha matao la buena educación). Pero lo que estaba buscando es lo que han sugerido escafandra y ecfisa. Más saludos para todos.

[Casimiro Noteví]

Ya nos contarás

[Tortuguica]

Ya os puedo contar: al final, no lo he hecho como decíais... porque no tengo muy claro lo de la escritura y lectura de archivos binarios :-( Pero, y esta es la parte positiva, me habéis dado una idea. Ahora lo guardo todo en un archivo con la longitud de cada parte (rtf, txt, ini) al principio de cada una de ellas. Después recupero cada parte, la transformo en un archivo temporal conveniente, lo utilizo y me lo cargo. Es un poco primario, pero eficiente. Prometo estudiar un poco más de Delphi para no tener que volver a recurrir a cutreríos como el que he hecho. Gracias de nuevo a todos por vuestro interés. Un saludo.

[fide_uci]

Yo mejor utilizaria por ejemplo algo como ZipForge. Usando este componente creo un Zip, meto cada uno de los archivos en un Zip y ya esta. Incluso le puedo poner hasta contraseña al Zip para que nadie los pueda extraer. Luego a la hora de revertir el proceso leo el Zip, extraigo los archivo y los utilizo. No seria mala idea verdad?