Investigando un poco sobre el asunto he dado con un ejemplo que soluciona esto enviando un mensaje WM_COMMAND al notepad en este caso y funciona. El ejemplo necesita de tan solo un botón cuyo evento debe ser:
Código Delphi
[-]
procedure TForm1.Button1Click(Sender: TObject);
var
wnd: HWND;
begin
winexec('notepad',SW_SHOW);
wnd := FindWindow('notepad', nil);
PostMessage(wnd,WM_COMMAND, hiword(1)+2,0);
end;
Con este ejemplo se abre el notepad y se simula un click en el item Abrir del menú Archivo.
El ejemplo lo he encontrado
aquí.
La cosa es q he intentado lo mismo con el Google Earth y no he podido... si alguien se atreve que me comente el resultado por favor.
Salu2...