Hallo Skripter,
bin dabei ein Skript zu schreiben um das Erstellen eines neuen Benutzers zu erleichtern. Aktuell bin ich an der Oberfläche dran, aber da gibt es da Problem, dass ich drei Radio Button´s nicht zu einer GroupBox hinzufügen kann bzw. den Fehler nicht finde.
Habe schon viele Tests gemacht bei denen es funktioniert hat also kann es meiner Ansicht nach nur eine Kleinigkeit sein, aber genau diese hat mich schon lange suchen lassen - ohne Erfolg.
Vielen Dank für eure Bemühungen :)
Hier der Code:
function global:GUI
{
# .NET-Erweiterungen werden in den Ram geladen
Add-Type -AssemblyName System.Windows.Forms
Add-Type -AssemblyName System.Drawing
#Fenster wird erstellt
$global:fenster = New-Object System.Windows.Forms.Form
$fenster.Text = 'Assistent zum Erstellen eines neuen Benutzers'
$fenster.Size = New-Object System.Drawing.Size(900,900)
$fenster.StartPosition = 'CenterScreen'
$fenster.KeyPreview = $True
$fenster.Add_KeyDown({if ($_.KeyCode -eq „Escape“) {$fenster.DialogResult = 0} })
$Font = New-Object System.Drawing.Font("Arial",9)
$fenster.Font = $Font
#Gruppenbox Benutzerdaten
$MyGroupBox = New-Object System.Windows.Forms.GroupBox
$MyGroupBox.Location = '40,30'
$MyGroupBox.size = '480,650'
$MyGroupBox.text = "GroupBox"
#Gruppenbox Bereichsauswahl
$MyGroupBox1 = New-Object System.Windows.Forms.GroupBox
$MyGroupBox1.Location = '550,150'
$MyGroupBox1.size = '280,400'
$MyGroupBox1.text = "GroupBox1"
#Label und Textfeld zur Eingabe des Nachnamens
$global:label1 = New-Object System.Windows.Forms.Label
$label1.Location = New-Object System.Drawing.Point(60,30)
$label1.Size = New-Object System.Drawing.Size(120,30)
$label1.Text = 'Nachname:'
$global:textBox1 = New-Object System.Windows.Forms.TextBox
$textBox1.Location = New-Object System.Drawing.Point(180,30)
$textBox1.Size = New-Object System.Drawing.Size(130,30)
$global:labelbsp1 = New-Object System.Windows.Forms.Label
$labelbsp1.Location = New-Object System.Drawing.Point(320,30)
$labelbsp1.Size = New-Object System.Drawing.Size(150,30)
$labelbsp1.Text = 'Bsp.: Mustermann'
#Label und Textfeld zur Eingabe des Vornamens
$global:label2 = New-Object System.Windows.Forms.Label
$label2.Location = New-Object System.Drawing.Point(60,100)
$label2.Size = New-Object System.Drawing.Size(120,30)
$label2.Text = 'Vorname:'
$global:textBox2 = New-Object System.Windows.Forms.TextBox
$textBox2.Location = New-Object System.Drawing.Point(180,100)
$textBox2.Size = New-Object System.Drawing.Size(130,30)
$global:labelbsp2 = New-Object System.Windows.Forms.Label
$labelbsp2.Location = New-Object System.Drawing.Point(320,100)
$labelbsp2.Size = New-Object System.Drawing.Size(150,30)
$labelbsp2.Text = 'Bsp.: Max'
#Label und Textfeld zur Eingabe der Beschreibung
$global:label3 = New-Object System.Windows.Forms.Label
$label3.Location = New-Object System.Drawing.Point(60,170)
$label3.Size = New-Object System.Drawing.Size(120,30)
$label3.Text = 'Beschreibung:'
$global:textBox3 = New-Object System.Windows.Forms.TextBox
$textBox3.Location = New-Object System.Drawing.Point(180,170)
$textBox3.Size = New-Object System.Drawing.Size(130,30)
$global:labelbsp3 = New-Object System.Windows.Forms.Label
$labelbsp3.Location = New-Object System.Drawing.Point(320,170)
$labelbsp3.Size = New-Object System.Drawing.Size(150,30)
$labelbsp3.Text = 'Bsp.: XXXX'
#Label und Dropdown-Auswahl zur Eingabe des Titels #Dropdown Auswahl
$global:label4 = New-Object System.Windows.Forms.Label
$label4.Location = New-Object System.Drawing.Point(60,240)
$label4.Size = New-Object System.Drawing.Size(120,30)
$label4.Text = 'Titel:'
$global:dropdown1 = New-Object System.Windows.Forms.Combobox
$dropdown1.Location = New-Object System.Drawing.Size(180,240)
$dropdown1.Size = New-Object System.Drawing.Size(130,30)
[void] $dropdown1.Items.Add("XX") #Angestellter
[void] $dropdown1.Items.Add("")
$dropdown1.Height = 70
$global:labelbsp4 = New-Object System.Windows.Forms.Label
$labelbsp4.Location = New-Object System.Drawing.Point(320,240)
$labelbsp4.Size = New-Object System.Drawing.Size(150,30)
$labelbsp4.Text = 'Test Titel'
#Label und Textfeld zur Eingabe der Raumnummer
$global:label5 = New-Object System.Windows.Forms.Label
$label5.Location = New-Object System.Drawing.Point(60,310)
$label5.Size = New-Object System.Drawing.Size(120,30)
$label5.Text = 'Raumnummer:'
$global:textBox5 = New-Object System.Windows.Forms.TextBox
$textBox5.Location = New-Object System.Drawing.Point(180,310)
$textBox5.Size = New-Object System.Drawing.Size(130,30)
$global:labelbsp5 = New-Object System.Windows.Forms.Label
$labelbsp5.Location = New-Object System.Drawing.Point(320,310)
$labelbsp5.Size = New-Object System.Drawing.Size(150,30)
$labelbsp5.Text = 'Bsp.: XXX'
#Label und Textfeld zur Eingabe des Vorgesetzten
$global:label6 = New-Object System.Windows.Forms.Label
$label6.Location = New-Object System.Drawing.Point(60,380)
$label6.Size = New-Object System.Drawing.Size(120,30)
$label6.Text = 'Vorgesetzter:'
$dropdown2 = New-Object System.Windows.Forms.Combobox
$dropdown2.Location = New-Object System.Drawing.Size(180,380)
$dropdown2.Size = New-Object System.Drawing.Size(130,30)
[void] $dropdown2.Items.Add("Administrator") #Für Testzwecke
$dropdown2.Height = 70
$global:labelbsp6 = New-Object System.Windows.Forms.Label
$labelbsp6.Location = New-Object System.Drawing.Point(320,380)
$labelbsp6.Size = New-Object System.Drawing.Size(150,30)
$labelbsp6.Text = ''
#Label und Dropdown-Auswahl zur Eingabe des Abteilung
$global:label7 = New-Object System.Windows.Forms.Label
$label7.Location = New-Object System.Drawing.Point(60,450)
$label7.Size = New-Object System.Drawing.Size(120,30)
$label7.Text = 'Abteilung:'
$global:dropdown3 = New-Object System.Windows.Forms.Combobox
$dropdown3.Location = New-Object System.Drawing.Size(180,450)
$dropdown3.Size = New-Object System.Drawing.Size(130,30)
[void] $dropdown3.Items.Add("")
$dropdown3.Height = 70
$global:labelbsp7 = New-Object System.Windows.Forms.Label
$labelbsp7.Location = New-Object System.Drawing.Point(320,450)
$labelbsp7.Size = New-Object System.Drawing.Size(150,30)
$labelbsp7.Text = ''
#Label und Textfeld zur Eingabe der Internen Telefonnumme
$global:label8 = New-Object System.Windows.Forms.Label
$label8.Location = New-Object System.Drawing.Point(60,520)
$label8.Size = New-Object System.Drawing.Size(120,40)
$label8.Text = 'interne Telefonnummer:'
$global:textBox8 = New-Object System.Windows.Forms.TextBox
$textBox8.Location = New-Object System.Drawing.Point(180,520)
$textBox8.Size = New-Object System.Drawing.Size(130,30)
$global:labelbsp8 = New-Object System.Windows.Forms.Label
$labelbsp8.Location = New-Object System.Drawing.Point(320,520)
$labelbsp8.Size = New-Object System.Drawing.Size(150,30)
$labelbsp8.Text = 'Bsp.: XXXX'
#Label und Textfeld zur Eingabe der Mobiltelefonnummer
$global:label9 = New-Object System.Windows.Forms.Label
$label9.Location = New-Object System.Drawing.Point(60,590)
$label9.Size = New-Object System.Drawing.Size(120,30)
$label9.Text = 'Mobiltelefon:'
$global:textBox9 = New-Object System.Windows.Forms.TextBox
$textBox9.Location = New-Object System.Drawing.Point(180,590)
$textBox9.Size = New-Object System.Drawing.Size(130,30)
$global:labelbsp9 = New-Object System.Windows.Forms.Label
$labelbsp9.Location = New-Object System.Drawing.Point(320,590)
$labelbsp9.Size = New-Object System.Drawing.Size(150,30)
$labelbsp9.Text = 'Bsp.: XXXX'
#Radio button 1
$global:RadioButton1 = New-Object System.Windows.Forms.RadioButton
$RadioButton1.Location = '590,200'
$RadioButton1.size = '150,20'
$RadioButton1.Checked = $false
$RadioButton1.Text = "Radio1"
#Radio button 2
$global:RadioButton2 = New-Object System.Windows.Forms.RadioButton
$RadioButton2.Location = '590,300'
$RadioButton2.size = '150,20'
$RadioButton2.Checked = $false
$RadioButton2.Text = "Radio2"
#Radio button 3
$global:RadioButton3 = New-Object System.Windows.Forms.RadioButton
$RadioButton3.Location = '590,400'
$RadioButton3.size = '150,20'
$RadioButton3.Checked = $false
$RadioButton3.Text = "Radio3"
#Button Erstellen
$global:erstellenButton = New-Object System.Windows.Forms.Button
$erstellenButton.Location = New-Object System.Drawing.Size(140,750)
$erstellenButton.Size = New-Object System.Drawing.Size(120,50)
$erstellenButton.Text = „Erstellen“
$erstellenButton.Enabled = $false
$erstellenButton.Add_Click{Benutzererstellung}
#Button Abbrechen
$global:cancelButton = New-Object System.Windows.Forms.Button
$cancelButton.Location = New-Object System.Drawing.Size(360,750)
$cancelButton.Size = New-Object System.Drawing.Size(120,50)
$cancelButton.Text = „Abbrechen“
$cancelButton.DialogResult = [System.Windows.Forms.DialogResult]::Cancel
$fenster.CancelButton = $CancelButton
#Button Prüfen
$global:PrüfenButton = New-Object System.Windows.Forms.Button
$PrüfenButton.Location = New-Object System.Drawing.Size(580,750)
$PrüfenButton.Size = New-Object System.Drawing.Size(120,50)
$PrüfenButton.Text = „Prüfen“
$PrüfenButton.Add_Click{Prüfung}
#Hinzufügen zum Fenster
$fenster.Controls.AddRange(@($MyGroupBox, $MyGroupBox1, $erstellenButton, $PrüfenButton, $cancelButton))
#Hinzufügen zur GroupBox #rechts
$MyGroupBox.Controls.AddRange(@($label1,$label2,$label3,$label4,$label5,$label6,$label7,$label8,$label9,$textBox1,$textBox2,$textBox3,$textBox5,$textBox8,$textBox9,$dropdown1,$dropdown2,$dropdown3,$labelbsp1,$labelbsp2,$labelbsp3,$labelbsp4,$labelbsp5,$labelbsp6,$labelbsp7,$labelbsp8,$labelbsp9))
#Hinzufügen zur GroupBox1 #links
$MyGroupBox1.Controls.AddRange(@($RadioButton1,$RadioButton2,$RadioButton3))
$fenster.Add_Shown({$fenster.Activate()})
$fenster.Topmost = $true
[void] $fenster.ShowDialog()
}
GUI