Verificar quando o form tem o foco

[Rafael Portal 0]

Olá Galera.. Tipo eu gostaria de saber como é que eu faço pra verificar quando o meu formulário está minimizado ou sem o foco???? Tipo eu quero que quando o meu formulário receber o foco ou for restaurado ele faça um evento ... Vces saberiam me dizer???? Agradecido.. Rafael Portal

[fabiosc80 0]

Olá Galera.. Tipo eu gostaria de saber como é que eu faço pra verificar quando o meu formulário está minimizado ou sem o foco???? Tipo eu quero que quando o meu formulário receber o foco ou for restaurado ele faça um evento ... Vces saberiam me dizer???? Agradecido.. Rafael Portal

Usa Form1.Focus

[fabiosc80 0]

Olá Galera.. Tipo eu gostaria de saber como é que eu faço pra verificar quando o meu formulário está minimizado ou sem o foco???? Tipo eu quero que quando o meu formulário receber o foco ou for restaurado ele faça um evento ... Vces saberiam me dizer???? Agradecido.. Rafael Portal

Usa Form1.Focus

Ops...SetFocus

[cassitos 2]

o form tem alguns eventos q você pode utilizar, dependendo da ocasião:

 

Activate --> executa o código quando o formulário é ativado (recebe foco, etc)

Resize --> quando o formulário sofre alteração em sua dimensão (largura, altura, quando é minimizado, etc)

 

ex:

 

Private sub Form1_Activate()

msgbox "Formulário ativado!"

End Sub

Private sub Form1_Resize()

msgbox "Resize Ativado!"

end sub

flws

[Rafael Portal 0]

Tipo o que eu preciso é o seguinte:

 

 

If MeuFormEstiverComOFoco Then      bla bla blaend If

 

Tipo... eu não quero trabalhar quando ele estiver com o foco... eu quero VERIFICAR se ele está com o foco... beleza??????

 

Agradecido a todos, abraços..

Rafael Portal

[eclipsekiller 0]

Tipo o que eu preciso é o seguinte:

If MeuFormEstiverComOFoco Then      bla bla blaend If

Tipo... eu não quero trabalhar quando ele estiver com o foco... eu quero VERIFICAR se ele está com o foco... beleza??????Agradecido a todos, abraços..Rafael Portal

Teste com o actvate, pois toda vez que o formulario recebe o focu, ele aciona esse evento. http://forum.imasters.com.br/public/style_emoticons/default/excl.gif O seu bla bla bla pode ficar dentro deste evento sem problema algum.Qualquer duvida Meu MSN: comercial@siriusenterprise.com.br B)

[cassitos 2]

Tipo... eu não quero trabalhar quando ele estiver com o foco... eu quero VERIFICAR se ele está com o foco... beleza??????

ok... ok...

 

então vamos a outra opção:

 

num botão qualquer ponha este código:

 

if Screen.ActiveForm.Name = Me.Name then

msgbox "Estou ativo!"

else

msgbox "Não estou ativo!"

en dif

observe que Screen.ActiveForm, como o nome já diz, você pode saber qual formulário está ativo no projeto.

então basta comparar se o ativo é o que você quer saber.

Outro exemplo:

 

if Screen.ActiveForm.Name = "FrmFuncionario" then

msgbox "Formulário de Funcionários ativo!"

else

msgbox "Formulário de Funcionários inativo!"

en dif

flw

[Rafael Portal 0]

Valeu cassitos era exatamente isso que eu procurava!!!!!