[DeG]

Path:='C:\TuCarpeta\';
WinExec(PAnsiChar(AnsiString(Path+TuPrograma.exe')),SW_SHOWNORMAL);