Verificar si un HWND esta con focus?

[Alejo15x]

Hola!

Supongo que esto iria en la API, ya que un HWND es un api. Creo bueno, tengo el siguiente codigo:
para verificar si una HWND esta arriva de todas, osea que la estamos usando...(Focus) >.<

Código Delphi [-]
procedure VerificarVentanas();
begin
 HVentana := FindWindow( 'TibiaClient', nil );
{ Si esta con focus la HVentana que... }
{
  ShowWindow( Application.Handle, SW_SHOW );
  SetWindowLong( Handle, GWL_EXSTYLE,
      GetWindowLong(Application.Handle, GWL_EXSTYLE) or
      WS_EX_TOOLWINDOW and not WS_EX_APPWINDOW);
  ShowWindow( Application.Handle, SW_HIDE );
}
{ Si no esta con focus la HVentana que... }
// Application.ShowMainForm := false;
end;

Espero me entiendan, un saludo!