COMO EU CHAMO A TELA PARA FRENTE DAS DEMAIS?
Não, não é isso não....
é uma API, achei uma chamada BringWindowToTop, mas não to conseguindo o resultado
Não entendo, pois ela faria o que realmente quero, e a unica coisa que pede como parametro é o hWnd, e eu passo isso pra ela, mas não poe o form na frente das demais janeias do windows..........
é uma API, achei uma chamada BringWindowToTop, mas não to conseguindo o resultado
Não entendo, pois ela faria o que realmente quero, e a unica coisa que pede como parametro é o hWnd, e eu passo isso pra ela, mas não poe o form na frente das demais janeias do windows..........
Este exemplo serve?
Private Declare Function BringWindowToTop Lib "user32" (ByVal hwnd As Long) As Long
Flw!
Private Declare Function BringWindowToTop Lib "user32" (ByVal hwnd As Long) As Long
Private Sub Command1_Click()
'in form1
'Set Form2 on top
BringWindowToTop Form2.hwnd
End Sub
Private Sub Form_Load()
'in form1
Form2.Visible = True
End Sub
Private Sub Command1_Click()
'in form2
'Set Form1 on top
BringWindowToTop Form1.hwnd
End Sub
Flw!
Já havia tentado com esta API
Acho que o problema é aqui........
é impossivel que não traga para frente, se todos os códigos estão "como deviam estar"....
Acho que o problema é aqui........
é impossivel que não traga para frente, se todos os códigos estão "como deviam estar"....
O maneiratradicional para trazer um formulário para a frente é o método ZOrder, outras formas seriam
abrir o formulário com estilo modal, ou usar a API SetWindowPos com flag HWND_TOPMOST.
abrir o formulário com estilo modal, ou usar a API SetWindowPos com flag HWND_TOPMOST.
Private Sub Form_GotFocus()
If Me.Visible And Me.WindowState = vbMaximizedFocus Then Me.ZOrder
End Sub
Tópico encerrado , respostas não são mais permitidas