Programación General > Pascal

 Ficheros en Binario/hexadecimal

(1/2) > >>

SergioyoPlayer:
Veréis: quiero poder leer y crear ficheros en mdo binario ("a pelo"). Yo codifico e interpreto cómo está guardado el fichero, al estilo "editor hexadecimal", que te abre lo que sea y ves cómo está.
Ya me he definido las funciones necesarias para represetar el binario y todo eso, pero no sé de qué tipo tiene que ser declarado el fichero :s

O he intentado con BYTE, y traducir a binario, pero es igual que abrirlo en modo texto (no es lo que yo quiero, ya que no abre todos los ficheros). He probado con declararlo de tipo BOOLEAN, alternando el TRUE a 1 y luego probé a 0, pero nada.

Alguna idea?? Os pongo mi "aplicación experimental" como adjunto

Sobre todo, quedáos con la idea de que necesito poder abrir CUALQUIER FICHERO como un editor hexadecimal lo hace.

Gracias de antemano!!

m0skit0:
¿Crees de verdad que alguien en su sano juicio va a descargar y ejecutar un programa que ni siquiera sabe a ciencia cierta de dónde ha salido? Yo no.


--- Código: Pascal --- VAR f_binario: FILE OF byte;  

eternity:
Lo que quieres es hacer un programa que haga algo de este tipo:


--- Código: Text ---  "000000000  4C 6F 20 71 75 65 20 71-75 69 65 72 65 73 20 65   |Lo que quieres e|""000000010  73 20 68 61 63 65 72 20-75 6E 20 70 72 6F 67 72   |s hacer un progr|""000000020  61 6D 61 20 71 75 65 20-68 61 67 61 20 61 6C 67   |ama que haga alg|""000000030  6F 20 64 65 20 65 73 74-65 20 74 69 70 6F 3A      |o de este tipo: |"   
si es asi consultame, si no, no entiendo que es lo que queres hacer!

SergioyoPlayer:
Es precisamente lo que dice Eternity jeje

Pero quiero que sea capaz de abrir cualquier tipo de dato escrito en disco (con lo de BYTE solo me abre los de texto y los demás, abre "solo un cacho", porque el EOF salta antes de acabar :s)

Respecto a lo de bajar una aplicación que en efecto, no sabes de dónde ha salido, está en rar por algo ¬¬

Pd.: Si me puedes decir cómo declarar el tipo y cómo leerlo, te lo agradecería mucho eternity

eternity:
Tendrias que probar con lo siguiente:


--- Código: Pascal --- Var   archivo: file of text;  
eso deberia abrir cualquier archivo, ahora estoy un tanto ocupado con la facu, asi que depues vere eso que dices sobre el EOF, mandame el codigo de lo que tengas y yo te lo reviso y debugueo, por que si no es muy dificil, vamos a los hechos!

  :good:

Navegación

[0] Índice de Mensajes

[#] Página Siguiente

Ir a la versión completa