powershellの形の赤い薄緑色の光

Question

ボタンを使ってフォームを表示するためにpowershellを使用しようとすると、ボタンがテストを実行します。 これは仕事です。 テストに失敗した場合は、ボタンの隣にある円が赤色になります。 と緑色です。これはできましたか？もしそうなら、FillEllipseは正しい方法ですか？ 新しいフォームを作成する必要はありますか？

#Load the GDI+ and WinForms Assemblies 

`enter code here`[void] [System.Reflection.Assembly]::LoadWithPartialName("System.Drawing") 
[void] [System.Reflection.Assembly]::LoadWithPartialName("System.Windows.Forms") 
# Create pen and brush objects 

$myBrush = new-object Drawing.SolidBrush green 
$mypen = new-object Drawing.Pen black 



# Create a Rectangle object for use when drawing rectangle 

#$rect = new-object Drawing.Rectangle 10, 10, 180, 180 



# Create a Form 

$form = New-Object System.Windows.Forms.Form 

$form.Size = New-Object System.Drawing.Size(600,600) 

$form.text = "Network Connectivity Test" 



#$form = New-Object Windows.Forms.Form 



# Get the form's graphics object 

$formGraphics = $form.createGraphics() 



function do-interface { 

# 

} 



#$Label = New-Object System.Windows.Forms.Label 

$Label.Text = "Ethernet 1" 

#$Label.AutoSize = $true 

$Label.Location = New-Object System.Drawing.Size(75,50) 

$Font = New-Object System.Drawing.Font("Arial",15,[System.Drawing.FontStyle]::Bold) 

$form.Font = $Font 

$Form.Controls.Add($Label) 



# Define the paint handler 

$form.add_paint(
{ 
$formGraphics.FillEllipse($myBrush, 350, 80, 15, 15) # draw an ellipse using rectangle object 

#$formGraphics.FillEllipse($myBrush, $rect) # draw an ellipse using rectangle object 

} 

) 

$Button = New-Object System.Windows.Forms.Button 

$Button.Location = New-Object System.Drawing.Size(30,30) 

$Button.Size = New-Object System.Drawing.Size(90,40) 

$Button.Text = "Interfaces" 

$Button.Add_Click({do-interface}) 

$form.Controls.Add($Button) 
$form.Add_Shown({$form.Activate()}) 
[void] $form.ShowDialog() 

Answer 1

ちょうどあなたの行うインタフェース方法

$myBrush = new-object Drawing.SolidBrush ("green", "red")[$testFailed] 
$formGraphics.FillEllipse($myBrush, 350, 80, 15, 15) 

にFillEllipseを追加$ testFailedが$ falseをまたはと赤であれば、コードは緑を返します後$ trueの場合または

("green", "red")[$testFailed] 

また、あなたはadd_paintで楕円を記入する必要はありません。したがって、全体の例は次のようになります。

#Load the GDI+ and WinForms Assemblies 

[void] [System.Reflection.Assembly]::LoadWithPartialName("System.Drawing") 
[void] [System.Reflection.Assembly]::LoadWithPartialName("System.Windows.Forms") 
# Create pen and brush objects 

$mypen = new-object Drawing.Pen black 

# Create a Rectangle object for use when drawing rectangle 
#$rect = new-object Drawing.Rectangle 10, 10, 180, 180 

# Create a Form 
$form = New-Object System.Windows.Forms.Form 
$form.Size = New-Object System.Drawing.Size(600,600) 
$form.text = "Network Connectivity Test" 

#$form = New-Object Windows.Forms.Form 
# Get the form's graphics object 
$formGraphics = $form.createGraphics() 

function do-interface { 
$testFailed = Get-Random -Maximum 2 
Write-Host $testFailed 
$myBrush = new-object Drawing.SolidBrush ("green", "red")[$testFailed] 
$formGraphics.FillEllipse($myBrush, 350, 80, 15, 15) # draw an ellipse using rectangle object 
} 


#$Label = New-Object System.Windows.Forms.Label 
#$Label.Text = "Ethernet 1" 
#$Label.AutoSize = $true 
#$Label.Location = New-Object System.Drawing.Size(75,50) 
$Font = New-Object System.Drawing.Font("Arial",15,[System.Drawing.FontStyle]::Bold) 
$form.Font = $Font 
#$Form.Controls.Add($Label) 

# Define the paint handler 

$form.add_paint(
{ 

#delete this method, if you need it 

#$formGraphics.FillEllipse($myBrush, $rect) # draw an ellipse using rectangle object 

} 

) 

$Button = New-Object System.Windows.Forms.Button 

$Button.Location = New-Object System.Drawing.Size(30,30) 

$Button.Size = New-Object System.Drawing.Size(90,40) 

$Button.Text = "Interfaces" 

$Button.Add_Click({do-interface}) 

$form.Controls.Add($Button) 
$form.Add_Shown({$form.Activate()}) 
[void] $form.ShowDialog()