carlos gonzalez,
Realiza los siguientes cambios:
Código Delphi
[-]
Window := FindWindow(nil,'Visual2');
Código Delphi
[-]
Application.Title := 'Visual2';
Te anexo un ejemplo de dos aplicaciones en Delphi 7, que activan su foco externamente según lo comentado en este tema en el siguiente link:
Espero sea útil
Nelson.