mercredi 5 décembre 2012

Ajouter des infos bulles.

Lorsque l'on laisse la souris immobile au-dessus d'un contrôle pendant une seconde, un texte sur fond jaune apparaît et donne une information sur le rôle du contrôle. Cette fonction c'est l'info-bulle (ToolTip). Dans l'exemple suivant nous allons voir la mise en œuvre de l'info-bulle dans PowerShell.

 
#Menu contextuel sur un contrôle.
[Reflection.Assembly]::LoadWithPartialName("System.Windows.Forms")

#Ouvre une fenêtre.
$form = New-Object Windows.Forms.Form
$form.text = "Info bulle"            
$form.Size = New-Object System.Drawing.Size(190,210)

#Préparation de l'environnement pour afficher des infos bulles dans la fenêtre.
$bulles1 = New-Object System.Windows.Forms.ToolTip         #Création de l'objet.
$bulles1.BackColor = [System.Drawing.Color]::LightGoldenrodYellow #Couleur fond.
$bulles1.IsBalloon = $false        #Mode bulle (true ou false).
$bulles1.ReshowDelay = 250         #Délais avant affichage en ms.
$bulles1.InitialDelay = 250        #Délais avant affichage en ms.

#Création d'une image (PictureBox).
$image1 = New-Object System.Windows.Forms.pictureBox
$image1.Location = New-Object Drawing.Point 40,40
$image1.Size = New-Object System.Drawing.Size(100,100)
$image1.image = [system.drawing.image]::FromFile("C:\jumbor.jpg")

#Création d'une info bulle pour la PictureBox.
$bulles1.SetToolTip($image1, "jumbor.jpg")

#Attache le contrôle à la fenêtre.
$form.controls.add($image1)

#Affiche le tout.
$form.ShowDialog()

#Fin.