Ver Mensaje Individual
  #3  
Antiguo 18-09-2008
Avatar de cHackAll
[cHackAll] cHackAll is offline
Baneado?
 
Registrado: oct 2006
Posts: 2.159
Reputación: 20
cHackAll Va por buen camino
vejeref; no por abrir 50 hilos va a haber mayor atencion en tu problema, por favor ya no lo hagas que no es correcto. Se muy bien que es algo frustrante no conseguir los resultados esperados pero debes tener paciencia, si nadie te contesta puedes "revivir" el hilo que comenzaste.

Lamento no haberte dado más soluciones pero recien en un post anterior me he podido percatar de mi problema de vista... habiendo tambien descargado el Google Earth podremos hablar el mismo idioma, aqui una idea;

Código Delphi [-]
uses Windows, Messages, ActiveX, ComObj;
 
var
 ge: OleVariant;
 hWnd: Integer;
 
begin
 CoInitialize(nil);
 ge := CreateOleObject('GoogleEarth.ApplicationGE');
 hWnd := ge.GetMainHwnd;
 
 keybd_event(VK_MENU, 0, 0, 0);
 keybd_event(VK_CONTROL, 0, 0, 0);
 Sleep(64); SendMessage(hWnd, WM_CHAR, Ord('B'), 0);
 keybd_event(VK_CONTROL, 0, KEYEVENTF_KEYUP, 0);
 keybd_event(VK_MENU, 0, KEYEVENTF_KEYUP, 0);
end.

PD; a futuro incluye snapshots para ver lo que quieres hacer.

Saludos
__________________
RTFM > STFW > Foro > Truco > Post > cHackAll > KeBugCheckEx
Responder Con Cita