Programación en pascal

Mario - 29/08/2004 14:21
Buenas, lo siento, pero ando un poco desesperado con una cosa. En turbo pascal al igual que en otros lenguajes (supongo) se puede trabajar con ficheros que no sean de texto, sino que se denominan (binarios), este tipo de archivos difiere principalmente de los de texto en que no están estructurados en líneas sino que son secuenciales.
(No sé por qué cuento este, quien lo sepa lo sabe, y quien no, no le voy a descuibrir nada, en fin).

Pongo un poco de código para que veáis a lo que me refiero.

Type.

Tfich= récord.

Clave:integer.

Indice:real.

End.

Fich= file of tfich:
Var.

F:fich.

Me piden que genere uno archivo de estas características a partir de uno de texto. Para acceder al de texto no tengo problemas, el problema es cuando intento escribir algo en el fichero binario, o cuando intento leer algo, no sé cómo hacerlo.

Una sentencia de este tipo : read(f,f. Clave) da error.

No sé si me habréis entendido, si no, pues preguntar.

Si sabéis cualquier cosa, ponedla. Si sabéis de algún foro de pascal, en español, en inglés, en chino, ponedlo por favor. Saludos estos.
Mars Attacks - 29/08/2004 19:10
[url]www.stratos-ad.com[/url]. El foro es un foro de programadores orientado a videojuegos, pero al menos se acerca más que un foro de grafistas.

Hace mil años que di pascal, no me acuerdo de nada. Un poco obsoleto, el lenguaje, de todas formas.
Mario - 30/08/2004 00:32
Gracias Mars, ya lo he solucionado, (viva el e-mail). Y sí, como lenguaje es una castaña, pero, yo no lo elegí. Un saludo.
Gorehide - 30/08/2004 13:45
Buenas Mario: Yo programo en Delphi, que también es pascal. Te dejo la dirección del mejor foro de Delphi que yo conozco, para cuando te vuelvan a surgir dudas. [url]http://www.clubdelphi.com/[/url]. Un saludo.

Gorehide.
BuGMaN - 30/08/2004 19:48
Si bueno, es que, a la hora de leer no tienes que poner f. Clave, si no que tienes que crear una variable de tipo tfich y es en esa en la que tienes que leer, ej:
Var.

Mireg:tfich.

F:fich.

Begin.

Read(f, mireg).

End.