Toujours visible

Soyez le premier à donner votre avis sur cette source.

Vue 1 404 fois - Téléchargée 258 fois

Description

Comment rendre un formulaire toujours visible ( Always On Top ) ?

Mettez le code suivant dans un module :

Source / Exemple :


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

Private Const SWP_NOSIZE = &H1
Private Const SWP_NOMOVE = &H2
Private Const HWND_TOPMOST = -1
Private Const HWND_NOTOPMOST = -2

Public Sub RendreFormTjsVisible(MonForm as object)
     SetWindowPos MonForm.hWnd,  HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE or SWP_NOSIZE
End Sub

Public Sub RendreFormPasTjsVisible(MonForm as object)
     SetWindowPos MonForm.hWnd,  HWND_NOTOPMOST, 0, 0, 0, 0, SWP_NOMOVE or SWP_NOSIZE
End Sub

'Pour Rendre le Formulaire Toujours Visible Faites : ( MonForm = Le nom de votre Formulaire )

RendreFormTjsVisible MonForm

'Pour que le Formulaire ne soit plus Toujours Visible Faites :

RendreFormPasTjsVisible MonForm

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

cs_advisor
Messages postés
11
Date d'inscription
dimanche 8 septembre 2002
Statut
Membre
Dernière intervention
8 septembre 2002

oui mais bon, pas mal, sauf que ça fonctionne pas pour les form sous MDI !
Jujufouq
Messages postés
254
Date d'inscription
jeudi 27 décembre 2001
Statut
Membre
Dernière intervention
5 mars 2006

Merci bien.
JTR00062
Messages postés
1
Date d'inscription
mardi 13 mai 2003
Statut
Membre
Dernière intervention
4 juin 2003

Marche Nikel !
Merci bcp
cs_AlexKid
Messages postés
10
Date d'inscription
jeudi 9 janvier 2003
Statut
Membre
Dernière intervention
31 juillet 2003

Haou super terrible juste ce que je cherchais depuis un petit moment
MAIS c normal si dans la feuille on a des infos bulles et que ces dernieres n apparaissent plus qd on est en always on top ? ca fe la meme chose dans Winamp avec le meme procede (alwys on top)

Est il possible d y remedier
fifipil909
Messages postés
57
Date d'inscription
jeudi 23 janvier 2003
Statut
Membre
Dernière intervention
24 mai 2006

10/10

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.