A ver, creo que algunos de los miembros ya han respondido a esta cuestion pero creo que puede ser de ayuda mi comentario.
Lo más simple y rapido creo que podria ser:
1º Leer el fichero de forma que la salida nos produzca el numero de registros que posee
2º Redimensionar una variable tipo, EL REGISTRO, el cual debemos insertar en ella. EJº REDIM var(num_Regist)
3º Volver a leer el fichero insertando en esta variable todos los registros del fichero
4º Ordenarlos por el metodo QUICK en la variable
5º Abrir el fichero e insertar los registros ordenados
Espero servir de ayuda. Un saludo