Tema: Form On Top
Ver Mensaje Individual
  #4  
Antiguo 17-10-2007
Avatar de cHackAll
[cHackAll] cHackAll is offline
Baneado?
 
Registrado: oct 2006
Posts: 2.159
Reputación: 20
cHackAll Va por buen camino
Código Delphi [-]
 Application.MainForm.FormStyle := fsStayOnTop;
 
 Application.MainForm.FormStyle := fsNormal;
 Application.MainForm.SendToBack;

ó

Código Delphi [-]
 SetWindowPos(Aplicacion.GetMainHwnd,HWND_TOPMOST,220,75,ancho-220,alto-75,SWP_SHOWWINDOW);

y luego:

Código Delphi [-]
 SetWindowPos(Aplicacion.GetMainHwnd,HWND_NOTOPMOST,0,0,0,0,SWP_NOSIZE+SWP_NOMOVE);
 SetForegroundWindow(FindWindow({clase}, {nombre})); // La clase y/o el nombre de la ventana del Google Earth

Suerte!
Responder Con Cita