FORM MODAL

USUARIO.EXCLUIDOS 16/04/2007 13:51:58
#212099
tem alguma forma de saber se um form aberto é modal?
CLEVERTON 16/04/2007 14:34:46
#212105
Não entendi, explique melhor o que vc está tentando fazER ?
USUARIO.EXCLUIDOS 16/04/2007 14:56:13
#212113
se existe eu nao sei, mas eu faria o seguinte, antes de chamar o form, eu preencheria a propriedade TAG dele com algum valor para identificar isso.
USUARIO.EXCLUIDOS 16/04/2007 15:12:32
#212118
Resposta escolhida
Não sei se tem outra forma, mas dá com tratamento de erro (o form será ativado caso não seja modal):

Err.Clear
On Error Resume Next
Me.Show
If Err Then
MsgBox "Modal"
Else
MsgBox "Não Modal"
End If

USUARIO.EXCLUIDOS 16/04/2007 15:18:24
#212121
eu preciso do seguinte, criar uma rotina para depois de X minutos inativo, que o sistema vá para a tela de login, mas quando a pessoa logar de novo, que estejam abertas todas as janelas que eram abertas antes.

O que eu estou fazendo é dar um hide em todos os forms, e depois que for logado de novo, faço mostrar todas eles de volta.
For iCont = Forms.Count To 1 Step -1
Forms(iCont - 1).Hide
Next iCont


Porém, os forms que eram modais devem voltar a ser modais, e esta voltando como um form normal.
For iCont = 1 To Forms.Count
Forms(iCont - 1).Show
Next iCont


eu precisava de alguma forma saber quando o form é modal, armazenar em uma variavel talve, e dar o show como modal ou nao
USUARIO.EXCLUIDOS 16/04/2007 15:27:47
#212124
Cara, então desiste, pq não vai dar certo, mesmo que você saiba se é modal ou não, pois quando for chamá-los novamente, imagine, vc chama como modal um, aí ele vai ser aberto, mas como ele está modal, o sistema para até fechá-lo, daí não chama os outros, sacou?

a melhor coisa que faz é exibir a tela de login como modal sobre as outras, ou então a famosa gambia de MOVER todos os forms para fora da tela e dpois voltá-los à posição inicial...flw
USUARIO.EXCLUIDOS 16/04/2007 15:31:48
#212126
ok entao, obrigado ;)
Tópico encerrado , respostas não são mais permitidas