Конструктор класса powershell для кнопок формы
У меня есть форма PowerShell, которую я использую для управления установленными приложениями, и предлагаю метод быстрого удаления этого приложения. Я пытаюсь создать конструктор класса для кнопок на форме, чтобы я мог включить или отключить состояние кнопки на форме из другой функции. Вот что я пытаюсь сделать, но я открыт для других предложений.
Add-Type -AssemblyName System.Windows.Forms
class App
{
[string] $Name
[bool] $Installed
[string] $Key32
[string] $Key64
[string] $Inst_Dir
[bool] $Current
[string] $Exec
[string] $User_Ver
[string] $Inst_Ver
App ([string] $Name, [bool] $Installed, [string] $Key32, [string] $Key64, [string] $Inst_Dir, [bool] $Current, [string] $Exec, [string] $User_Ver, [string] $Inst_Ver)
{
$this.Name = $Name
$this.Installed = $Installed
$this.Key32 = $Key32
$this.Key64 = $Key64
$this.Inst_Dir = $Inst_Dir
$this.current = $Current
$this.Exec = $Exec
$this.User_Ver = $User_Ver
$this.Inst_Ver = $Inst_Ver
}
}
class Button
{
[string] $Text
[int] $Width
[int] $Height
[string] $Font
[bool] $Enabled
Button ([string] $Text, [int] $Width, [int] $Height, [string] $Font, [bool] $Enabled)
{
$this.Text = $Text
$this.Width = $Width
$this.Height = $Height
$this.Font = $Font
$this.Enabled = $Enabled
}
}
#region Define and initialize Variables
$HKLM32 = ".\SOFTWARE\Key Location"
$HKLM64 = ".\SOFTWARE\Wow6432Node\Key Location"
# Initialize app classes
[App] $TestApp= [App]::new("TestApp", $false, "$HKLM32\TestApp $TestApp_Ver", "$HKLM64\TestApp $TestApp_Ver", "", $false, "", $TestApp_Ver, "")
$apps = $TestApp
Function create_form()
{
$Form = New-Object system.Windows.Forms.Form
$Form.Text = "Performance Test Auto Setup"
$Form.TopMost = $true
$Form.Width = 480
$Form.Height = 300
$Form.StartPosition = "CenterScreen"
$Form.FormBorderStyle = "Fixed3D"
$Form.MaximizeBox = $false
$Form.MinimizeBox = $false
[Button] $btnTestAppUninstall = [Button]::new("Uninstall", 95, 22, "Microsoft Sans Serif, 10", $true)
New-Object System.Drawing.Point(285, 9)
<#
$btnTestAppUninstall = New-Object system.windows.Forms.Button
$btnTestAppUninstall.Text = "Uninstall"
$btnTestAppUninstall.Width = 95
$btnTestAppUninstall.Height = 22
$btnTestAppUninstall.location = new-object system.drawing.point(285,9)
$btnTestAppUninstall.Font = "Microsoft Sans Serif,10"
$btnTestAppUninstall.Enabled = $false
$Form.controls.Add($btnTestAppUninstall)
$btnTestAppUninstall.Add_Click({uninstallApp($TestApp.Inst_Dir)})
#>
$btnTest = New-Object system.windows.Forms.Button
$btnTest.Text = "test"
$btnTest.Width = 95
$btnTest.Height = 22
$btnTest.location = new-object system.drawing.point(50,9)
$btnTest.Font = "Microsoft Sans Serif,10"
$Form.controls.Add($btnTest)
$btnTest.Add_Click({updateUI})
$Form.ShowDialog() | Out-Null
}
Function updateUI()
{
$apps | ForEach-Object {$app = [string]("$"+"btn$($_.Name)Uninstall")}
Write-Host $app.GetType() $btnTestAppUninstall.GetType()
}
create_Form
Закомментированный раздел в середине формы create - это то, как я изначально создавал кнопку при создании формы, которая отлично работает. Проблема заключается в настройке кнопки. Включение этой кнопки осуществляется из другой функции, которая использует цикл foreach-object в массиве $ apps. Я сократил этот фрагмент до одной кнопки в форме, которая при запуске будет показывать кнопку тестирования, но ничего другого, так как конструктор класса не создает кнопку. Функция тестовой кнопки "updateUI" - вот почему я пытаюсь сделать это таким образом, так как при создании имени переменной кнопки я создавал "строку", а не объект "system.drawings.button", поэтому я не могу получить доступ к включенной имущество.
Я надеюсь, что то, что я пытаюсь сделать здесь, понятно и может ответить на любые вопросы. Я извиняюсь за неаккуратную половину, отработанную над кодом, поэтому вот фрагмент, прежде чем я начал работать над конструктором класса, где у меня есть кнопка, но я не могу изменить состояние.
Add-Type -AssemblyName System.Windows.Forms
class App
{
[string] $Name
[bool] $Installed
[string] $Key32
[string] $Key64
[string] $Inst_Dir
[bool] $Current
[string] $Exec
[string] $User_Ver
[string] $Inst_Ver
App ([string] $Name, [bool] $Installed, [string] $Key32, [string] $Key64, [string] $Inst_Dir, [bool] $Current, [string] $Exec, [string] $User_Ver, [string] $Inst_Ver)
{
$this.Name = $Name
$this.Installed = $Installed
$this.Key32 = $Key32
$this.Key64 = $Key64
$this.Inst_Dir = $Inst_Dir
$this.current = $Current
$this.Exec = $Exec
$this.User_Ver = $User_Ver
$this.Inst_Ver = $Inst_Ver
}
}
#region Define and initialize Variables
$HKLM32 = ".\SOFTWARE\Key Location"
$HKLM64 = ".\SOFTWARE\Wow6432Node\Key Location"
# Initialize app classes
[App] $TestApp = [App]::new("TestApp", $false, "$HKLM32\TestApp $TestApp_Ver", "$HKLM64\TestApp $TestApp_Ver", "", $false, "", $TestApp_Ver, "")
$apps = $TestApp
Function create_form()
{
$Form = New-Object system.Windows.Forms.Form
$Form.Text = "Performance Test Auto Setup"
$Form.TopMost = $true
$Form.Width = 480
$Form.Height = 300
$Form.StartPosition = "CenterScreen"
$Form.FormBorderStyle = "Fixed3D"
$Form.MaximizeBox = $false
$Form.MinimizeBox = $false
$btnTestAppUninstall = New-Object system.windows.Forms.Button
$btnTestAppUninstall.Text = "Uninstall"
$btnTestAppUninstall.Width = 95
$btnTestAppUninstall.Height = 22
$btnTestAppUninstall.location = new-object system.drawing.point(285,9)
$btnTestAppUninstall.Font = "Microsoft Sans Serif,10"
$btnTestAppUninstall.Enabled = $false
$Form.controls.Add($btnTestAppUninstall)
$btnTestAppUninstall.Add_Click({uninstallApp($TestApp.Inst_Dir)})
$btnTest = New-Object system.windows.Forms.Button
$btnTest.Text = "test"
$btnTest.Width = 95
$btnTest.Height = 22
$btnTest.location = new-object system.drawing.point(50,9)
$btnTest.Font = "Microsoft Sans Serif,10"
$Form.controls.Add($btnTest)
$btnTest.Add_Click({updateUI})
$Form.ShowDialog() | Out-Null
}
Function updateUI()
{
$apps | ForEach-Object {$app = [string]("$"+"btn$($_.Name)Uninstall")}
Write-Host $app.GetType() $btnTestAppUninstall.GetType()
}
create_Form
Также стоит отметить, что я знаю, что могу напрямую настроить состояние с помощью
$btnTestAppUninstall.Enabled = $true
или же
$btnTestAppUninstalled.Enabled = $false
Это, однако, не является оптимальным решением, поскольку я пытаюсь решить эту проблему, потому что каждая кнопка в форме должна иметь эти два параметра в нескольких местах в функции updateUI, а в реальной форме имеется 22 кнопки. Это много СУХОГО, сломанного там. Если я смогу сделать эту работу, я могу просто перебрать все с помощью цикла foreach-object и установить состояние на основе сохраненного значения в объекте класса.
Любая помощь приветствуется, я пытался понять это в течение нескольких дней.
1 ответ
Так что в конце концов я отказался от этого метода и пошел со старым добрым циклом for. Я создал динамические списки, основанные на том, что включено в форме, затем я перебираю списки одновременно, используя порядковый номер, чтобы присвоить соответствующее значение соответствующему объекту.
Function updateVersions()
{
for($i = 0; $i -lt $apps.Length; $i++)
{
If(prop32Bit($apps[$i].Key32) -Not $Null)
{
$apps[$i].Inst_Dir = $appDir
$apps[$i].Exec = (Get-ItemProperty -Path $apps[$i].Key32)."Application Name"
$apps[$i].Ver = (Get-ItemProperty -Path $apps[$i].Key32).Version
$apps[$i].Installed = $true
}
ElseIf (prop64Bit($apps[$i].Key64) -Not $Null)
{
$apps[$i].Inst_Dir = $appDir
$apps[$i].Exec = (Get-ItemProperty -Path $apps[$i].Key64)."Application Name"
$apps[$i].Inst_Ver = (Get-ItemProperty -Path $apps[$i].Key64).Version
$apps[$i].Installed = $true
}
Else
{
$apps[$i].Inst_Dir = $Null
$apps[$i].Exec = $Null
$apps[$i].Inst_Ver = "Not Installed"
$apps[$i].Installed = $false
}
}
# Update version labels
For($i = 0; $i -lt $listVerLbls.Length; $i++)
{
$listVerLbls[$i].Text = $apps[$i].Inst_Ver
}
# Update uninstall buttons
For($i = 0; $i -lt $listUninBtns.Length; $i++)
{
If($apps[$i].installed)
{
$listUninBtns[$i].Enabled = $true
}
Else
{
$listUninBtns[$i].Enabled = $false
}
}
# Update current buttons
For($i = 0; $i -lt $listCurBtns.Length; $i++)
{
If($apps[$i].installed)
{
$listCurBtns[$i].Enabled = $true
$listCurBtns[$i].BackColor = "DarkRed"
$listCurBtns[$i].ForeColor = "White"
}
Else
{
$listCurBtns[$i].Enabled = $false
$listCurBtns[$i].BackColor = "Control"
$listCurBtns[$i].ForeColor = "ControlDark"
}
}
}
Это прекрасно работает для того, что я пытался сделать.