|
bueno, te propongo una posible solucion
Como bien dices, con FindFirst y FindNext puedes leer los 800 archivos. Pues bien, primero los lees todos y vas almacenando en un TStringList la ruta con el nombre de los mismos.
Ahora solo tienes que posicionar un puntero en ese TStringList para ir leyendo los 6 archivos siguientes (sumando 6 al puntero) o los 6 anteriores (restando 12 al puntero y leyendo 6)
Espero que la idea te sirva
|