Opacité d'une fenetre: la rendre transparente

Soyez le premier à donner votre avis sur cette source.

Vue 6 734 fois - Téléchargée 818 fois

Description

Ce code n'est pas une révolution, il permet juste de changer l'opacité d'une fenetre (comme par exemple winamp 3.0)
Ce la permet donc de la rendre plus ou moins transparent.
Il est tres simple a utiliser
Seulement il ne fonctionne que sous win 2000 et win xp (désolé pour les autres mais c'est a cause de microsoft)

Donc laisser vos commentaires

Source / Exemple :


' IN THE ZIP

Codes Sources

A voir également

Ajouter un commentaire

Commentaires

Messages postés
51
Date d'inscription
vendredi 20 février 2004
Statut
Membre
Dernière intervention
7 juillet 2006

LOL
encore mieux que :

For I = 0 To 255 Step 10
DoEvents
SetLayer Me.hWnd, I
Next
SetLayer Me.hWnd, 255

For I = 0 To 25
DoEvents
SetLayer Me.hWnd, I
Next
SetLayer Me.hWnd, 255

désolé j'ai pas pu m'empecher...
Messages postés
20
Date d'inscription
mardi 10 février 2004
Statut
Membre
Dernière intervention
13 mai 2009

Salut tout le monde:
j'ai une question pour qui concerne programme qui rendre les formulaire transparents, ces programmes fonctionnent très bien lorsque les formulaires ne sont pas attachés a une feuille MDI (MDIchild=false), mais lorsque MDIchild=true le programme ne fonctionne plus.
POUKOI?
Messages postés
530
Date d'inscription
lundi 3 juin 2002
Statut
Membre
Dernière intervention
13 juin 2004

Je crois que les sources copulent trop souvent, elles se multiplient, et en +, C exactement les mêmes !

(C pas contre toa, auteur, mais bon, un petit peu quand même)
Alors toa, ki veut mettre un source Kash Direct comme ca, moa je t'arrête :
1° tu télécharge la compil' (c.f voir plus bas)
2° tu la fouille de haut en bas
3° Tu te vide les couilles et tu te défoule
4° Tu corrige les + grosses fôt d'aurtograf
5° La, je totoriz
Messages postés
30
Date d'inscription
lundi 9 octobre 2000
Statut
Membre
Dernière intervention
16 février 2010

et puis t'orais pu créer un ptit effet du genre au démarrage :

private sub form_Load()
SetLayer Me.hWnd, 0
Me.Show
For I = 0 To 255 Step 10
DoEvents
SetLayer Me.hWnd, I
Next
SetLayer Me.hWnd, 255
end sub

ca fait un effet de fondue assez classe.
mais sinon, c pas mal
Messages postés
30
Date d'inscription
lundi 9 octobre 2000
Statut
Membre
Dernière intervention
16 février 2010

ca a deja ete mis surr le vbfrance la semaine dernière
il fo utiliser l'api setlayerattribut

mais c vrai ke ca donne comme effet
Afficher les 6 commentaires

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.