La Web del Programador: Comunidad de Programadores
 
    Pregunta:  64351 - PASAR DE UN PROGRAMA(.PAS) A OTRO .PAS
Autor:  juan perez
Necesito pasar de un "menu principal" hecho en pascal, a otro programa tambien hecho en pascal. En el menu principal pongo diversas opciones, y cada una de ellas me debe llevar a un programa distinto, por favor ayudenme!.

  Respuesta:  ramon garcia
Ejemplo de programa que activara uno exterior:
al finalizar retorna al programa,
program  ejecuci;

{$M $4000,0,0 } {asignacion de memoria}
uses Dos;
var
Programanombre, comandoLinea : string;
begin
Write('Programa a ejecutar (path completo): ');
ReadLn(Programanombre);
Write('L¡nea de comandos a pasar a ', Programanombre, ': ');
ReadLn(comandoLinea);
WriteLn('A punto de ejecutar...');
SwapVectors;
Exec(Programanombre, comandoLinea);
SwapVectors;
WriteLn('...de vuelta');
if DosError <> 0 then{ ¨Error? }
WriteLn('Dos error #', DosError)
else
WriteLn('Ejecuci¢n satisfactoria. ',
'C¢digo de salida de proceso hijo = ',
DosExitCode);
end.

lo puedes colocar solo las partes que te interesen como
procedimiento para llamada a programas diversos.