Como fazer um form. sempre visivel ?

[nelson_caetano 0]

Olá, pessoal !

Como faço para deixar um formulário sempre visivel (em 1.º plano) na execução ?

Desde já Agradeço.

Obs. Sou iniciante e estou usando o VB 4.0 16 bits sob Win 3.11. http://forum.imasters.com.br/public/style_emoticons/default/cry.gif

[supino 0]

se for o que eu estou pensando na hora de chamar o form poe issoNome_do_form.show 1

[Luizgrs 0]

Para deixar uma form a frente de tudo que está rodando no pc você tem que usar essa API. Mas eu ñ sei se vai funcionar com o VB4 e o win3.11 mas ñ custa tentar:

'no General ou num MóduloPublic Declare Function SetWindowPos Lib "user32" (ByVal hWnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal Y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long 'no form     Call SetWindowPos(Me.hWnd, -1, 0, 0, 0, 0, &H1 Or &H2)

[nelson_caetano 0]

Para deixar uma form a frente de tudo que está rodando no pc você tem que usar essa API. Mas eu ñ sei se vai funcionar com o VB4 e o win3.11 mas ñ custa tentar:

'no General ou num MóduloPublic Declare Function SetWindowPos Lib "user32" (ByVal hWnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal Y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long 'no form     Call SetWindowPos(Me.hWnd, -1, 0, 0, 0, 0, &H1 Or &H2)

<{POST_SNAPBACK}>

 

beleza, vou tentar se der certo aviso.

Muito Obrigado a todos !

[blac3r 0]

Para deixar uma form a frente de tudo que está rodando no pc você tem que usar essa API. Mas eu ñ sei se vai funcionar com o VB4 e o win3.11 mas ñ custa tentar:

'no General ou num MóduloPublic Declare Function SetWindowPos Lib "user32" (ByVal hWnd As Long, ByVal hWndInsertAfter As Long, ByVal x As Long, ByVal Y As Long, ByVal cx As Long, ByVal cy As Long, ByVal wFlags As Long) As Long 'no form     Call SetWindowPos(Me.hWnd, -1, 0, 0, 0, 0, &H1 Or &H2)

<{POST_SNAPBACK}>

vlw cara você me ajudo eu tava presisando dissu tb.