demando77
Messages postés4Date d'inscriptionjeudi 20 décembre 2007StatutMembreDernière intervention25 mai 2008
-
20 déc. 2007 à 16:15
nord666
Messages postés20Date d'inscriptionjeudi 19 avril 2007StatutMembreDernière intervention29 juin 2008
-
23 déc. 2007 à 01:03
Slt!
Je suis en train de developper en C# et j'aimerais que mes fenetres aient des formes que je souhaite (des images que je possède deja du genre arbre abattu, feille de manguier,..)
Qui peut m'aides en VB et/ou C#
demando77
Messages postés4Date d'inscriptionjeudi 20 décembre 2007StatutMembreDernière intervention25 mai 2008 20 déc. 2007 à 16:18
Slt!
je désire personaliser ma fenetre cad qu'elle ait une forme autre que celle par défaut de windows du genre media player,... avec des images que j'ai.
Je veux donc que ma fenetre ait cette forme là.
Que dois je faire?
nord666
Messages postés20Date d'inscriptionjeudi 19 avril 2007StatutMembreDernière intervention29 juin 2008 23 déc. 2007 à 01:03
Salut,
Si je comprend bien, tu veux une application en forme d'arbre avec de la transparence comme contour?
Si c'est ça, voici ce qu'il faut que tu fasses pour le faire en vb.net:
1) crée une image. Pour les endroits avec de la transparence, utilise une couleur du genre 45; 69; 62. En fait, une couleur que tu ne se retrouvera nul part sur ton programme.
2) enleve les bordures de ton programme (propriété FormBorderStyle = None)
3) met l'image que t'a fait comme image de fond (propriété BackgroundImage = TonImage
4) met la propriété TransparencyKey de la couleur que t'a choisi pour la transparence. Pour moi, c'est 45; 69; 62.
5) si tu démarre ton programme, tu devrais voir que sa fonctionne. Mais tu ne peux pas le déplacer ni le quitter.
6) pour le quitter, tu ajoute un bouton/picturebox qui le fait quitter.
7) pour le déplacer, copie ça dans ton code:
Private
Sub Programme_MouseDown(
ByVal sender
As
Object,
ByVal e
As System.Windows.Forms.MouseEventArgs)
Handles
MyBase.MouseDownLocationSouris = e.Location
End
Sub
Private
Sub Programme_MouseMove(
ByVal sender
As
Object,
ByVal e
As System.Windows.Forms.MouseEventArgs)
Handles
MyBase.MouseMove
If e.Button = Windows.Forms.MouseButtons.Left
Then
Dim variation
As Sizevariation.Width = e.X - LocationSouris.X