Bueno si el archivo no es muy rande puedes hacer una "rutinilla" que fácilmente te los desordene utilizando 2 TStrings;
(1) Carga el fichero en TStrings1
(2) Utilizando
Randomize y
Random (en la ayuda de delphi hay un ejemplo) con la limitación de
TStrings1.Count obtienes un número aleatorio X.
(3) Eliminas la línea X del TStrings1 y la pasas a TStrings2.
(4) Repite el (2) mientras queden líneas en TStrings1.
Espero haberme explicado decentemente.