Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Add-Type -AssemblyName System.Windows.Forms
- $Window = New-Object System.Windows.Forms.Form
- $Window.Text = "Laboratorium 3.1"
- $Window.Width = 800
- $Window.Height = 600
- $Window.AutoScale=$false
- $WindoW.AllowDrop=$false
- $WindowToChooseColor = New-Object System.Windows.Forms.ColorDialog
- $WindowToChooseColor.FullOpen=1
- $WindowToChooseFont = New-Object System.Windows.Forms.FontDialog
- $WindowToChooseFont.MaxSize = 18
- $Text = New-Object System.Windows.Forms.Label
- $Text.Text = "Wprowadz liczby do wykonania operacji: "
- $Text.Font = New-Object System.Drawing.Font("Times New Roman", 14)
- $Text.Width = 400
- $Text.Height = 25
- $Text.Location = New-Object System.Drawing.Size(255, 20)
- $Text.ForeColor = "Black"
- $Komunikat = New-Object System.Windows.Forms.Label
- $Komunikat.Text = ""
- $Komunikat.Width = 450
- $Komunikat.Font = New-Object System.Drawing.Font("Times New Roman", 14)
- $Komunikat.Location = New-Object System.Drawing.Size(270, 320)
- $Komunikat.ForeColor = "Red"
- $Window.Controls.Add($Komunikat)
- $TextBox1 = New-Object System.Windows.Forms.TextBox
- $TextBox1.Location = New-Object System.Drawing.Size(300, 60)
- $TextBox1.Width = 200
- $TextBox1.Height = 30
- $TextBox1.Text = "wartosc 1"
- $TextBox2 = New-Object System.Windows.Forms.TextBox
- $TextBox2.Location = New-Object System.Drawing.Size(300, 90)
- $TextBox2.Width = 200
- $TextBox2.Height = 30
- $TextBox2.Text = "wartosc 2"
- $Result = New-Object System.Windows.Forms.Label
- $Result.Text = "Wynik:"
- $Result.Width = 100
- $Result.Height = 70
- $Result.Font = New-Object System.Drawing.Font("Times New Roman", 18)
- $Result.Location = New-Object System.Drawing.Size(330, 120)
- $Window.Controls.Add($Result)
- $Result1 = New-Object System.Windows.Forms.Label
- $Result1.Text = " 0 "
- $Result.Height = 70
- $Result1.Font = New-Object System.Drawing.Font("Times New Roman", 18)
- $Result1.Location = New-Object System.Drawing.Size(440, 120)
- $ColorButton = New-Object System.Windows.Forms.Button
- $ColorButton.Text = "Kolor"
- $ColorButton.Location = New-Object System.Drawing.Size(350, 200)
- $ColorButton.BackColor = "White"
- $ColorButton.width = 80
- $ColorButton.Add_Click(
- {$WindowToChooseColor.ShowDialog();
- $Window.BackColor= $WindowToChooseColor.Color
- }
- ); #closes window after clicking
- $FontButton = New-Object System.Windows.Forms.Button
- $FontButton.Text = "Czcionka"
- $FontButton.BackColor = "White"
- $FontButton.Location = New-Object System.Drawing.Size(350, 225)
- $FontButton.width = 80
- $FontButton.Add_Click(
- {
- $WindowToChooseFont.ShowDialog()
- $Result.Font = $WindowToChooseFont.Font
- $Result1.Font = $WindowToChooseFont.Font
- }
- )
- $SumButton = New-Object System.Windows.Forms.Button
- $SumButton.Text = "Suma"
- $SumButton.BackColor = "White"
- $SumButton.Location = New-Object System.Drawing.Size(315, 270)
- $SumButton.Width = 45
- $SumButton.Add_Click({
- obliczSume
- }
- )
- $MulButton = New-Object System.Windows.Forms.Button
- $MulButton.Text = "Iloczyn"
- $MulButton.Location = New-Object System.Drawing.Size(365, 270)
- $MulButton.Width = 55
- $MulButton.BackColor = "White"
- $MulButton.Add_Click({
- obliczIloczyn
- })
- $DivButton = New-Object System.Windows.Forms.Button
- $DivButton.Text = "Iloraz"
- $DivButton.BackColor = "White"
- $DivButton.Location = New-Object System.Drawing.Size(425, 270)
- $DivButton.Width = 45
- $DivButton.Add_Click({
- obliczIloraz
- })
- $SubButton = New-Object System.Windows.Forms.Button
- $SubButton.Text = "Roznica"
- $SubButton.BackColor = "White"
- $SubButton.Location = New-Object System.Drawing.Size(363, 296)
- $SubButton.Width = 60
- $SubButton.Add_Click({
- obliczRoznice
- })
- function obliczSume(){
- Try{
- $Result1.Text = [System.Convert]::ToInt32($TextBox1.Text) + [System.Convert]::ToInt32($TextBox2.Text)
- $Komunikat.Text = ""
- }
- Catch{
- $Result1.Text = "Błąd"
- $Komunikat.Text = "Musisz wprowadzic obe liczby"
- }
- }
- function obliczRoznice(){
- Try{
- $Result1.Text = [System.Convert]::ToInt32($TextBox1.Text) - [System.Convert]::ToInt32($TextBox2.Text)
- $Komunikat.Text = ""
- }
- Catch{
- $Result1.Text = "Błąd"
- $Komunikat.Text = "Musisz wprowadzic obe liczby"
- }
- }
- function obliczIloczyn(){
- Try{
- $Result1.Text = [System.Convert]::ToInt32($TextBox1.Text) * [System.Convert]::ToInt32($TextBox2.Text)
- $Komunikat.Text = ""
- }
- Catch{
- $Result1.Text = "Błąd"
- $Komunikat.Text = "Musisz wprowadzic obe liczby"
- }
- }
- function obliczIloraz(){
- Try{
- If([System.Convert]::ToInt32($TextBox2.Text) -eq 0){
- $Komunikat.Text = "Nie mozna dzielic przez 0"
- $Result1.Text = "Bład"
- }
- else{
- $Result1.Text = [System.Convert]::ToInt32($TextBox1.Text) / [System.Convert]::ToInt32($TextBox2.Text)
- $Komunikat.Text = ""
- }
- }
- Catch{
- $Result1.Text = "Błąd"
- $Komunikat.Text = "Musisz wprowadzic obe liczby"
- }
- }
- $window.Controls.Add($Text)
- $Window.Controls.Add($fontButton)
- $Window.Controls.Add($Result1)
- $Window.Controls.Add($TextBox1)
- $Window.Controls.Add($TextBox2)
- $Window.Controls.Add($ColorButton)
- $Window.Controls.Add($SumButton)
- $Window.Controls.Add($MulButton)
- $Window.Controls.Add($DivButton)
- $Window.Controls.Add($SubButton)
- $Window.ShowDialog()
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement