¿Como dividir un archivo en varios archivos?

[soul6301]

Hola:
Yo hice un programa como el que pides... Pero quizá use un método algo arcahico, sin embargo, funciona igual. Abre el archivo como un archivo de bytes y vas leyendo uno por uno cada byte y lo vas guardando en otro abierto del mismo modo. Utiliza la sentencia for para que sólo copies la cantidad de bytes que desees. Cierras el segundo archivo cuando termines y abres uno nuevo donde continúas copiando.
Para tratar con archivo de bytes, la misma ayuda de Delphi te puede ofrecer una orientación.
Espero te haya servido mi respuesta. Suerte con tu programa.