Form en primer plano

[ecfisa]

Empezado por chinchan

Gracias por responder. Efectivamente, las soluciones que dáis valen si llamo a este Form como ShowModal

Hola chinchan.

Si, lo que te sugerí en el mensaje #3, funciona siempre que el form se muestre de forma modal. En cambio lo que te sugiere escafandra es una solución completa, ya que funciona para ambos modos.

Pero para que conserve el comportamiento aún despues de una segunda pérdida del foco, creo que habría que pasarle el flag SWP_SHOWWINDOW en lugar de SWP_NOACTIVATE.

void  __fastcall TForm2::WndProc(Messages::TMessage& Message)
{
  if( Visible && Message.Msg == WM_KILLFOCUS ) {
    SetWindowPos(Handle, HWND_TOPMOST, 0, 0, 0, 0, 
      SWP_NOMOVE | SWP_NOSIZE | SWP_SHOWWINDOW );
  }
  TForm::WndProc(Message);
}

Saludos.