1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114
| ############# FONCTIONS ##############
function SAISIE
{
# Création des labels de connexion et des textbox #
$labelPort = New-Object Windows.Forms.Label
$labelPort.Text = " ENTREZ LE PORT A OUVRIR OU FERMER "
$labelPort.Size = New-Object System.Drawing.Size(400,20)
$labelPort.
$labelPort.Location = New-Object System.Drawing.Size(180,20)
$TextBoxPort = New-Object Windows.Forms.TextBox
$TextBoxPort.Size = New-Object System.Drawing.Size(250,300)
$TextBoxPort.Location = New-Object System.Drawing.Size(230,100)
# On ajoute les textbox et les labels dans la fenêtre principale :
$fen_principale.Controls.Add($labelPort)
$fen_principale.Controls.Add($TextBoxPort)
}
function BOUTON_OUVRIR
{
########### Création d'un bouton OUVRIR ###########
$ouvrir=New-Object System.Windows.Forms.Button
$ouvrir.Text="OUVRIR LE PORT"
#Taille du bouton OUVRIR PORT
$ouvrir.Size = New-Object System.Drawing.Size(300,40)
#Positionnement du bouton OUVRIR PORT
#Le point (0;0) correspond au coin supérieur gauche de la fenêtre.
$ouvrir.Location = New-Object System.Drawing.Size(200,200)
#EVENEMENT BOUTON OUVRIR, lorsqu'on clique dessus, la port doit s'ouvrir
$ouvrir.Add_Click(
{
$saisie_port=$TextBoxPort.Text
})
# Ajout du bouton sur la fenêtre créée précédemment
$fen_principale.Controls.Add($ouvrir)
}
function BOUTON_FERMER
{
########### Création d'un bouton QUITTER ###########
$fermer=New-Object System.Windows.Forms.Button
$fermer.Text="FERMER LE PORT"
#Taille du bouton QUITTER
$fermer.Size = New-Object System.Drawing.Size(300,40)
#Positionnement du bouton QUITTER
#Le point (0;0) correspond au coin supérieur gauche de la fenêtre.
$fermer.Location = New-Object System.Drawing.Size(200,250)
#EVENEMENT BOUTON QUITTER, lorsqu'on clique dessus, la fenêtre doit se fermer
$fermer.Add_Click(
{
$fen_principale.Close()
})
# Ajout du bouton sur la fenêtre créée précédemment
$fen_principale.Controls.Add($fermer)
}
function BOUTON_QUITTER
{
########### Création d'un bouton QUITTER ###########
$quitter=New-Object System.Windows.Forms.Button
$quitter.Text="QUITTER"
#Taille du bouton QUITTER
$quitter.Size = New-Object System.Drawing.Size(300,40)
#Positionnement du bouton QUITTER
#Le point (0;0) correspond au coin supérieur gauche de la fenêtre.
$quitter.Location = New-Object System.Drawing.Size(200,320)
#EVENEMENT BOUTON QUITTER, lorsqu'on clique dessus, la fenêtre doit se fermer
$quitter.Add_Click(
{
$fen_principale.Close()
})
# Ajout du bouton sur la fenêtre créée précédemment
$fen_principale.Controls.Add($quitter)
}
########## DEBUT INTERFACE GRAPHIQUE ###########
# Creation de la forme principale
$fen_principale = New-Object Windows.Forms.Form
# On peut ensuite définir certaines propriétés de la form , il en a des centaines.
# Choix du titre
$fen_principale.Text = "OUVERTURE DE PORTS"
# Choix de la taille , par défaut la taille (largeur, hauteur) est(300,300)
$fen_principale.Size = New-Object System.Drawing.Size(700,470)
SAISIE
BOUTON_OUVRIR
BOUTON_FERMER
BOUTON_QUITTER
# Affichage de la fenêtre principale
$fen_principale.ShowDialog() |
Partager