begin WinExec(PChar('c:\MiDir\MyApp.exe'), SW_SHOWNORMAL); Close; // no hace falta un Application.Terminate end;