Ex. concrets ! cacher la barre des tâches et la remettre

Soyez le premier à donner votre avis sur cette source.

Snippet vu 3 353 fois - Téléchargée 44 fois

Commenter

Contenu du snippet

Cette série de noyaux de code ou d'outils, peuvent être utilisés pour créer des programmes entiers, beaucoup plus simplement.
Très peu sont directement de moi, mais souvent décortiqués afin de les rendre beaucoup plus compréhensible et simple de ré-utilisation.

C'est assez marrant, si l'on veut faire une farce à un copain, si la souris arrive vers le bas de l'écran ... Poc ! Plus de barre !
Mais ca peut être aussi très utile !

Source / Exemple : 


' A mettre dans un module

Dim handleW1 As Long

Private Declare Function FindWindowA Lib "user32" _
(ByVal lpClassName As String, _
ByVal lpWindowName As String) As Long

Private Declare Function SetWindowPos Lib "user32" _
(ByVal handleW1 As Long, _
ByVal handleW1InsertWhere As Long, ByVal w As Long, _
ByVal x As Long, ByVal y As Long, ByVal z As Long, _
ByVal wFlags As Long) As Long

Const TOGGLE_HIDEWINDOW = &H80
Const TOGGLE_UNHIDEWINDOW = &H40

Function HideTaskbar()
    handleW1 = FindWindowA("Shell_traywnd", "")
    Call SetWindowPos(handleW1, 0, 0, 0, _
         0, 0, TOGGLE_HIDEWINDOW)
End Function

Function UnhideTaskbar()
    Call SetWindowPos(handleW1, 0, 0, 0, _
         0, 0, TOGGLE_UNHIDEWINDOW)
End Function

' A mettre dans votre code de form :

' Pour l'enlever :
HideTaskbar
' Et pour la remettre :
UnhideTaskbar

A voir également

Ajouter un commentaire

Commentaires

Signaler
cs_breton51
Messages postés
78
Date d'inscription
jeudi 21 avril 2005
Statut
Membre
Dernière intervention
15 novembre 2018
 -
j'ai un petit pb quand j'execute tes commande la barre des taches disparait bien, main elle réapparait au bout de quelque minute si tu a la solution.........
Signaler
Ludolpif
Messages postés
139
Date d'inscription
samedi 11 mai 2002
Statut
Membre
Dernière intervention
17 mai 2007
 -
De tien ! Mais, je n'ai fais que nettoyer un peu les codes trouvés parci parla !
Signaler
cs_stailer
Messages postés
511
Date d'inscription
jeudi 28 mars 2002
Statut
Membre
Dernière intervention
13 mai 2009
 1 -
Cool. J'avais déjà trouvé 1 ou 2 sources qui permettaient de la faire, mais c'était moins "propre". En fait, j'avais une grosse barre noire en bas de l'écran. Merci beaucoup. A+
S'inscrire maintenant

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.

Du même auteur (Ludolpif)