Ver Mensaje Individual
  #4  
Antiguo 14-04-2008
donsenior donsenior is offline
Registrado
 
Registrado: mar 2008
Posts: 4
Reputación: 0
donsenior Va por buen camino
Bueno finalmente lo logré, aunque no se si está muy bien ya que no tengo mucha ciencia al respecto sino más bien es algo empírico...
Lo que hice fue lo siguiente:
Código Delphi [-]
  public
    { Public declarations }
    procedure ShowNoActivate;
    procedure HideNoActivate;
  end;

procedure THintForm.ShowNoActivate;
begin
  Windows.ShowWindow(Handle, SW_SHOWNOACTIVATE);
  Windows.ShowWindow(Panel1.Handle, SW_SHOWNOACTIVATE);
  Windows.ShowWindow(Panel2.Handle, SW_SHOWNOACTIVATE);
  Windows.ShowWindow(Panel3.Handle, SW_SHOWNOACTIVATE);
  //Hay que hacer un ShowWindow por cada panel que contenga el Form
end;

procedure THintForm.HideNoActivate;
begin
  Windows.ShowWindow(Handle, SW_HIDE);
end;

Como decía, no se si estará muy bien, pero funciona

Si alguien sabe de alguna forma mejor, o piensa que esta forma tiene algún defecto por algun motivo, me gustaría saberlo...

Saludos!
Responder Con Cita