VB6 : Maintenir une appli au dessus des autres.

Dernière mise à jour le 16 novembre 2009 à 13:23 par marlalapocket
Publié par lermite222
Pour mettre une feuille au dessus des autres dans une application MDI il y a bien sur la fonction Zordre 0, mais mon propos est de maintenir une appli au dessus des autres appli, qu'elles soient présente à l'écran ou appellées après.

Dans un module général


Public 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

Public Const HWND_TOPMOST = -1
Public Const HWND_NOTOPMOST = -2
Public Const SWP_NOACTIVATE = &H10
Public Const SWP_SHOWWINDOW = &H40
Public Const SWP_NOMOVE = 2
Public Const SWP_NOSIZE = 1

Dans la forme d'ouverture


Private Sub Form_Load()
    Dim R as long
    R = SetWindowPos(NomFeuille.hwnd, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE)
end sub

En rappel


Il arrive que d’autres appli utilise cette fonction, il faut donc remettre la fonction dans l’activation de la forme, ce qui permet de reprendre cette fonction si la forme est sélectionée.
Private Sub Form_Activate()
    Dim R as long
    R = SetWindowPos(NomFeuille.hwnd, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE)
end sub

Supprimer la priorité


Private sub SuppPriorité()
    Dim R as long
    R= SetWindowPos(NomFeuille.hwnd, HWND_NOTOPMOST, 0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE)
End sub
Meilleures réponses pour « VB6 : Maintenir une appli au dessus des autres. » dans :
Windows 7: Le centre de maintenance VoirUne nouveauté dans Windows 7 est le centre de maintenance, semblable au centre de sécurité de Windows XP et Vista, il regroupe plus de paramètres et permet de régler des problèmes, gérer la sauvegarde, les mises à jour,... Comment y accéder? Pour...
Technicien de maintenance informatique VoirTechnicien de maintenance Le technicien de maintenance informatique (parfois appelé technicien support ou technicien d'exploitation) est chargé de s'assurer du bon fonctionnement des postes de travail, des logiciels et des périphériques...
Windows 7 - Centre de maintenance VoirLE CENTRE DE MAINTENANCE Successeur du Centre de sécurité de Windows XP et Windows Vista, le Centre de maintenance donne accès à toute une série de réglages permettant de veiller à la sécurité et à la « bonne santé » de votre ordinateur. Car les...
TMA (Tierce Maintenance Applicative) VoirTierce maintenance applicative La tierce maintenance applicative (notée TMA) consiste à externaliser la maintenance des applications, c'est-à-dire confier tout ou partie de la maintenance des applications à un prestataire informatique tiers contre...
Collection CommentÇaMarche.net