PowerShell/Interface graphique/Generated Form Function

Révision datée du 17 décembre 2020 à 10:47 par Fylip22 (discussion | contributions) (Page créée avec « #Generated Form Function function GenerateForm { ######################################################################## # Code Generated By: SAPIEN Technologies Primal... »)
(diff) ← Version précédente | Voir la version actuelle (diff) | Version suivante → (diff)
Aller à la navigation Aller à la recherche
  1. Generated Form Function

function GenerateForm {

  2. Code Generated By: SAPIEN Technologies PrimalForms (Community Edition) v1.0.9.0
  3. Generated On: 24/11/2016 18:46
  4. Generated By: Christophe
  1. region Import the Assemblies

[reflection.assembly]::loadwithpartialname("System.Drawing") | Out-Null [reflection.assembly]::loadwithpartialname("System.Windows.Forms") | Out-Null

  1. endregion
  1. region Generated Form Objects

$PINCode = New-Object System.Windows.Forms.Form $textBoxPIN = New-Object System.Windows.Forms.TextBox $buttonRDM = New-Object System.Windows.Forms.Button $buttonOK = New-Object System.Windows.Forms.Button $buttonBK = New-Object System.Windows.Forms.Button $button0 = New-Object System.Windows.Forms.Button $button9 = New-Object System.Windows.Forms.Button $button8 = New-Object System.Windows.Forms.Button $button7 = New-Object System.Windows.Forms.Button $button6 = New-Object System.Windows.Forms.Button $button5 = New-Object System.Windows.Forms.Button $button4 = New-Object System.Windows.Forms.Button $button3 = New-Object System.Windows.Forms.Button $button2 = New-Object System.Windows.Forms.Button $button1 = New-Object System.Windows.Forms.Button $InitialFormWindowState = New-Object System.Windows.Forms.FormWindowState

  1. endregion Generated Form Objects
  1. ----------------------------------------------
  2. Generated Event Script Blocks
  3. ----------------------------------------------
  1. Provide Custom Code for events specified in PrimalForms.

$buttonRDM_OnClick= {Randomize-Buttons} $button0_OnClick={$textBoxPIN.Text = $textBoxPIN.Text + $button0.Text} $button1_OnClick={$textBoxPIN.Text = $textBoxPIN.Text + $button1.Text} $button2_OnClick={$textBoxPIN.Text = $textBoxPIN.Text + $button2.Text} $button3_OnClick={$textBoxPIN.Text = $textBoxPIN.Text + $button3.Text} $button4_Click={$textBoxPIN.Text = $textBoxPIN.Text + $button4.Text} $button5_OnClick={$textBoxPIN.Text = $textBoxPIN.Text + $button5.Text} $button6_OnClick={$textBoxPIN.Text = $textBoxPIN.Text + $button6.Text} $button7_OnClick={$textBoxPIN.Text = $textBoxPIN.Text + $button7.Text} $button8_OnClick={$textBoxPIN.Text = $textBoxPIN.Text + $button8.Text} $button9_OnClick={$textBoxPIN.Text = $textBoxPIN.Text + $button9.Text} $buttonBK_OnClick={$code = $textBoxPIN.Text 

  if ($code.length -ne 0) {
    $textBoxPIN.Text = $code.Substring(0,$code.length -1)
    }

}

$buttonOK_OnClick= { 

 ####### !! CODE PIN SAISI
 Write-Host $textBoxPIN.Text

}

$OnLoadForm_StateCorrection= {#Correct the initial state of the form to prevent the .Net maximized form issue 

      $PINCode.WindowState = $InitialFormWindowState
   Randomize-Buttons

}


  1. ----------------------------------------------
  2. region Generated Form Code

$PINCode.AutoScaleMode = 0 $System_Drawing_Size = New-Object System.Drawing.Size $System_Drawing_Size.Height = 192 $System_Drawing_Size.Width = 250 $PINCode.ClientSize = $System_Drawing_Size $PINCode.FormBorderStyle = 'Fixed3D' $PINCode.MaximizeBox = $false $PINCode.DataBindings.DefaultDataSourceUpdateMode = 0 $PINCode.Name = "PINCode" $PINCode.Text = "Code ?" $PINCode.TransparencyKey = [System.Drawing.Color]::FromArgb(255,25,25,112)

$textBoxPIN.DataBindings.DefaultDataSourceUpdateMode = 0 $textBoxPIN.Font = New-Object System.Drawing.Font("Microsoft Sans Serif",16,1,3,0) $System_Drawing_Point = New-Object System.Drawing.Point $System_Drawing_Point.X = 56 $System_Drawing_Point.Y = 10 $textBoxPIN.Location = $System_Drawing_Point $textBoxPIN.Name = "textBoxPIN" $textBoxPIN.PasswordChar = '*' $System_Drawing_Size = New-Object System.Drawing.Size $System_Drawing_Size.Height = 32 $System_Drawing_Size.Width = 75 $textBoxPIN.Size = $System_Drawing_Size $textBoxPIN.TabIndex = 14 $textBoxPIN.TextAlign = 2 $textBoxPIN.UseSystemPasswordChar = $True

$PINCode.Controls.Add($textBoxPIN) $buttonRDM.BackColor = [System.Drawing.Color]::FromArgb(255,255,255,225) $buttonRDM.DataBindings.DefaultDataSourceUpdateMode = 0 $buttonRDM.Font = New-Object System.Drawing.Font("Microsoft Sans Serif",6,1,3,0)

$System_Drawing_Point = New-Object System.Drawing.Point $System_Drawing_Point.X = 8 $System_Drawing_Point.Y = 10 $buttonRDM.Location = $System_Drawing_Point $buttonRDM.Name = "buttonRDM" $System_Drawing_Size = New-Object System.Drawing.Size $System_Drawing_Size.Height = 29 $System_Drawing_Size.Width = 38 $buttonRDM.Size = $System_Drawing_Size $buttonRDM.TabIndex = 13 $buttonRDM.Text = "Rnd" $buttonRDM.UseVisualStyleBackColor = $False $buttonRDM.add_Click($buttonRDM_OnClick)

$PINCode.Controls.Add($buttonRDM) $buttonOK.BackColor = [System.Drawing.Color]::FromArgb(255,166,202,240) $buttonOK.DataBindings.DefaultDataSourceUpdateMode = 0 $buttonOK.Font = New-Object System.Drawing.Font("Microsoft Sans Serif",8.25,1,3,0)

$System_Drawing_Point = New-Object System.Drawing.Point $System_Drawing_Point.X = 8 $System_Drawing_Point.Y = 155 $buttonOK.Location = $System_Drawing_Point $buttonOK.Name = "buttonOK" $System_Drawing_Size = New-Object System.Drawing.Size $System_Drawing_Size.Height = 29 $System_Drawing_Size.Width = 36 $buttonOK.Size = $System_Drawing_Size $buttonOK.TabIndex = 12 $buttonOK.Text = "OK" $buttonOK.UseVisualStyleBackColor = $False $buttonOK.add_Click($buttonOK_OnClick)

$PINCode.Controls.Add($buttonOK) $buttonBK.BackColor = [System.Drawing.Color]::FromArgb(255,128,128,128)

$buttonBK.DataBindings.DefaultDataSourceUpdateMode = 0 $buttonBK.Font = New-Object System.Drawing.Font("Microsoft Sans Serif",8.25,1,3,0)

$System_Drawing_Point = New-Object System.Drawing.Point $System_Drawing_Point.X = 94 $System_Drawing_Point.Y = 155 $buttonBK.Location = $System_Drawing_Point $buttonBK.Name = "buttonBK" $System_Drawing_Size = New-Object System.Drawing.Size $System_Drawing_Size.Height = 29 $System_Drawing_Size.Width = 37 $buttonBK.Size = $System_Drawing_Size $buttonBK.TabIndex = 11 $buttonBK.Text = "<X" $buttonBK.UseVisualStyleBackColor = $False $buttonBK.add_Click($buttonBK_OnClick)

$PINCode.Controls.Add($buttonBK)


$button0.DataBindings.DefaultDataSourceUpdateMode = 0 $button0.Font = New-Object System.Drawing.Font("Microsoft Sans Serif",8.25,1,3,0)

$System_Drawing_Point = New-Object System.Drawing.Point $System_Drawing_Point.X = 50 $System_Drawing_Point.Y = 155 $button0.Location = $System_Drawing_Point $button0.Name = "button0" $System_Drawing_Size = New-Object System.Drawing.Size $System_Drawing_Size.Height = 29 $System_Drawing_Size.Width = 38 $button0.Size = $System_Drawing_Size $button0.TabIndex = 10

  1. $button0.Text = "0"

$button0.UseVisualStyleBackColor = $True $button0.add_Click($button0_OnClick)

$PINCode.Controls.Add($button0)

$button9.DataBindings.DefaultDataSourceUpdateMode = 0 $button9.Font = New-Object System.Drawing.Font("Microsoft Sans Serif",8.25,1,3,0)

$System_Drawing_Point = New-Object System.Drawing.Point $System_Drawing_Point.X = 94 $System_Drawing_Point.Y = 121 $button9.Location = $System_Drawing_Point $button9.Name = "button9" $System_Drawing_Size = New-Object System.Drawing.Size $System_Drawing_Size.Height = 28 $System_Drawing_Size.Width = 37 $button9.Size = $System_Drawing_Size $button9.TabIndex = 9

  1. $button9.Text = "9"

$button9.UseVisualStyleBackColor = $True $button9.add_Click($button9_OnClick)

$PINCode.Controls.Add($button9)

$button8.DataBindings.DefaultDataSourceUpdateMode = 0 $button8.Font = New-Object System.Drawing.Font("Microsoft Sans Serif",8.25,1,3,0) $System_Drawing_Point = New-Object System.Drawing.Point $System_Drawing_Point.X = 50 $System_Drawing_Point.Y = 120 $button8.Location = $System_Drawing_Point $button8.Name = "button8" $System_Drawing_Size = New-Object System.Drawing.Size $System_Drawing_Size.Height = 29 $System_Drawing_Size.Width = 38 $button8.Size = $System_Drawing_Size $button8.TabIndex = 8

  1. $button8.Text = "8"

$button8.UseVisualStyleBackColor = $True $button8.add_Click($button8_OnClick)

$PINCode.Controls.Add($button8)

$button7.DataBindings.DefaultDataSourceUpdateMode = 0 $button7.Font = New-Object System.Drawing.Font("Microsoft Sans Serif",8.25,1,3,0) $System_Drawing_Point = New-Object System.Drawing.Point $System_Drawing_Point.X = 8 $System_Drawing_Point.Y = 120 $button7.Location = $System_Drawing_Point $button7.Name = "button7" $System_Drawing_Size = New-Object System.Drawing.Size $System_Drawing_Size.Height = 29 $System_Drawing_Size.Width = 37 $button7.Size = $System_Drawing_Size $button7.TabIndex = 7

  1. $button7.Text = "7"

$button7.UseVisualStyleBackColor = $True $button7.add_Click($button7_OnClick)

$PINCode.Controls.Add($button7)

button6.DataBindings.DefaultDataSourceUpdateMode = 0 $button6.Font = New-Object System.Drawing.Font("Microsoft Sans Serif",8.25,1,3,0)

$System_Drawing_Point = New-Object System.Drawing.Point $System_Drawing_Point.X = 94 $System_Drawing_Point.Y = 86 $button6.Location = $System_Drawing_Point $button6.Name = "button6" $System_Drawing_Size = New-Object System.Drawing.Size $System_Drawing_Size.Height = 28 $System_Drawing_Size.Width = 37 $button6.Size = $System_Drawing_Size $button6.TabIndex = 6

  1. $button6.Text = "6"

$button6.UseVisualStyleBackColor = $True $button6.add_Click($button6_OnClick)

$PINCode.Controls.Add($button6)

$button5.DataBindings.DefaultDataSourceUpdateMode = 0 $button5.Font = New-Object System.Drawing.Font("Microsoft Sans Serif",8.25,1,3,0) $System_Drawing_Point = New-Object System.Drawing.Point $System_Drawing_Point.X = 50 $System_Drawing_Point.Y = 86 $button5.Location = $System_Drawing_Point $button5.Name = "button5" $System_Drawing_Size = New-Object System.Drawing.Size $System_Drawing_Size.Height = 28 $System_Drawing_Size.Width = 38 $button5.Size = $System_Drawing_Size $button5.TabIndex = 5

  1. $button5.Text = "5"

$button5.UseVisualStyleBackColor = $True $button5.add_Click($button5_OnClick)

$PINCode.Controls.Add($button5)

$button4.DataBindings.DefaultDataSourceUpdateMode = 0 $button4.Font = New-Object System.Drawing.Font("Microsoft Sans Serif",8.25,1,3,0) $System_Drawing_Point = New-Object System.Drawing.Point $System_Drawing_Point.X = 8 $System_Drawing_Point.Y = 86 $button4.Location = $System_Drawing_Point $button4.Name = "button4" $System_Drawing_Size = New-Object System.Drawing.Size $System_Drawing_Size.Height = 28 $System_Drawing_Size.Width = 38 $button4.Size = $System_Drawing_Size $button4.TabIndex = 4

  1. $button4.Text = "4"

$button4.UseVisualStyleBackColor = $True $button4.add_Click($button4_Click)

$PINCode.Controls.Add($button4)

$button3.DataBindings.DefaultDataSourceUpdateMode = 0 $button3.Font = New-Object System.Drawing.Font("Microsoft Sans Serif",8.25,1,3,0) $System_Drawing_Point = New-Object System.Drawing.Point $System_Drawing_Point.X = 94 $System_Drawing_Point.Y = 52 $button3.Location = $System_Drawing_Point $button3.Name = "button3" $System_Drawing_Size = New-Object System.Drawing.Size $System_Drawing_Size.Height = 28 $System_Drawing_Size.Width = 37 $button3.Size = $System_Drawing_Size $button3.TabIndex = 2

  1. $button3.Text = "3"

$button3.UseVisualStyleBackColor = $True $button3.add_Click($button3_OnClick)

$PINCode.Controls.Add($button3)

$button2.DataBindings.DefaultDataSourceUpdateMode = 0 $button2.Font = New-Object System.Drawing.Font("Microsoft Sans Serif",8.25,1,3,0) $System_Drawing_Point = New-Object System.Drawing.Point $System_Drawing_Point.X = 52 $System_Drawing_Point.Y = 52 $button2.Location = $System_Drawing_Point $button2.Name = "button2" $System_Drawing_Size = New-Object System.Drawing.Size $System_Drawing_Size.Height = 28 $System_Drawing_Size.Width = 36 $button2.Size = $System_Drawing_Size $button2.TabIndex = 1

  1. $button2.Text = "2"

$button2.UseVisualStyleBackColor = $True $button2.add_Click($button2_OnClick) $PINCode.Controls.Add($button2) $button1.DataBindings.DefaultDataSourceUpdateMode = 0

$button1.Font = New-Object System.Drawing.Font("Microsoft Sans Serif",8.25,1,3,0) $System_Drawing_Point = New-Object System.Drawing.Point $System_Drawing_Point.X = 8 $System_Drawing_Point.Y = 52 $button1.Location = $System_Drawing_Point $button1.Name = "button1" $System_Drawing_Size = New-Object System.Drawing.Size $System_Drawing_Size.Height = 28 $System_Drawing_Size.Width = 38 $button1.Size = $System_Drawing_Size $button1.TabIndex = 0

  1. $button1.Text = "1"

$button1.UseVisualStyleBackColor = $True $button1.add_Click($button1_OnClick)

$PINCode.Controls.Add($button1)

  1. endregion Generated Form Code
  1. Save the initial state of the form

$InitialFormWindowState = $PINCode.WindowState

  1. Init the OnLoad event to correct the initial state of the form

$PINCode.add_Load($OnLoadForm_StateCorrection)

  1. Show the Form

$PINCode.ShowDialog()| Out-Null } #End Function

function Randomize-Buttons { #Randomize button values 

 $buttonValue = 0..9 | Get-Random -Count 10
 $i = 0
 foreach ($Item in $buttonValue) {
  # Write-Output "Bouton[$i] = $($buttonValue[$i])"
   if ("button"+$i -eq $button0.Name) { $button0.Text = $($buttonValue[$i]) }
   if ("button"+$i -eq $button1.Name) { $button1.Text = $($buttonValue[$i]) }
   if ("button"+$i -eq $button2.Name) { $button2.Text = $($buttonValue[$i]) }
   if ("button"+$i -eq $button3.Name) { $button3.Text = $($buttonValue[$i]) }
   if ("button"+$i -eq $button4.Name) { $button4.Text = $($buttonValue[$i]) }
   if ("button"+$i -eq $button5.Name) { $button5.Text = $($buttonValue[$i]) }
   if ("button"+$i -eq $button6.Name) { $button6.Text = $($buttonValue[$i]) }
   if ("button"+$i -eq $button7.Name) { $button7.Text = $($buttonValue[$i]) }
   if ("button"+$i -eq $button8.Name) { $button8.Text = $($buttonValue[$i]) }
   if ("button"+$i -eq $button9.Name) { $button9.Text = $($buttonValue[$i]) }
  $i++
 }

}

  1. Call the Function

GenerateForm

Récupérée de « https://kono.phpage.fr/index.php?title=PowerShell/Interface_graphique/Generated_Form_Function&oldid=2342 »