Manejo de archivos binarios delphi 7

[Iña43]

Hola como les va gente? Espero que bien, primero que nada les quiero contar que estoy haciendo un juego de preguntas en el que separe preguntas y respuestas en dos array diferentes
(Preg[1]:=pregunta y resp[1]:=respuesta),los separe debido a que yo quiero escribir(write) leer(reed) y seek(buscar posicion especifica del array de pregunta para luego leerla con el read) todo esto con Tfilestream debido a que es mucho mas rapido y eficaz que blockwrite y blockread, ademas cada array cuenta con 30 slots y varia informacion en cada slot


Las preguntas son random aleatorias
Codigo no creo que sea necesario subir porq solamente tengo cargadas las preguntas y respuestas en los array y los condicionales(if , else if son para si la respuesta es correcta, si gano,si perdio una vida y eso)
Lo unico que quiero es informacion debido a que no encuentro nada similar en la web.