Manejo de archivos binarios delphi 7

[Iña43]

Informacion de preguntas y respuestas

Lo q no encuentro es como guardar y leer un array de string

Tfilestream se utiliza para guardar archivos muy pesados y hacerlos mas eficientes que el tradicional guardado

Si trabajo con arrays

Algo asi seria


Procedure copiar
// asignar el archicñvo y todo eso
For i:=1 ro N do
Writebuffer(copiar preguntas a un archivo)
End;

Function copiar
// asignar el archivo y todo eso
Seek(leer una posicion especifica de las preguntas por ej preg[5])
Readbuffer(leer la preg que escogi en el seek en este caso la 5)
End;


Function leer


End;

Function leer

[Iña43]

Function leer era el ultimo en vez de function copiar y (nose porq se me escribio el function leer abajo dos veces, esto no va)

[Neftali [Germán.Estévez]]

Por favor, utiliza TAG's cuando escribas código dentro de un mensaje.

En este hilo (y seguro que si buscas encontrarás más) puedes ver cómo trabajar com TFileStream y ReadBuffer y WriteBuffer.
https://www.clubdelphi.com/foros/showthread.php?t=90852

Otra opción es hacer algo más sencillo y trabajar con una estructura tipo TIniFile, que te permita almacenar en un único fichero preguntas y respuestas. No se de cuanto estamos hablando, pero a no ser que sean miles de preguntas no creo que exista mucha diferencia de tiempo. Si hablamos de 30 preguntas, posiblemente la diferencia de tiempo será inapreciable.