Как добавить выбранный файл ComboBox в TextBox с помощью Powershell? - PullRequest
2 голосов
/ 23 марта 2020

У меня есть GUI со списком и текстовым полем. Мне нужно обновить вывод текстового поля рассмотреть, чтобы комбобокс выбранный файл.

Я пробовал это. Но вывод в текстовое поле не является правильным. Любой может помочь, пожалуйста. СПАСИБО

$Disk = New-Object system.Windows.Forms.ComboBox
$Disk.AutoSize = $true
$Disk.DropDownStyle = "DropDownList"

$Disk.Items.AddRange((get-partition|?{$_.DriveLetter}|select DiskNumber ))
$SelectedFile= {
    $DiskSelected = $Disk.SelectedItem
    Write-Host "Disk Selected: $DiskSelected"

    $DiskNum = $DiskSelected -split "@{DiskNumber="
    $DiskNumber = $DiskNum -split "}"
    Write-Host "Disk Number: $DiskNumber"

    $TextBox1.AppendText((Get-Disk -Number $DiskNumber))
}

$Disk.add_SelectedIndexChanged($SelectedFile)
$Disk.DisplayMember = 'Name'

$TextBox1 = New-Object system.Windows.Forms.TextBox
$TextBox1.multiline = $true
$TextBox1.BackColor = "#F5F5F5"

Вывод в текстовом поле выглядит следующим образом

MSFT_Disk (ObjectId = "{1}\\SSXX\root/Microsoft/Windows/Stor...) MSFT_Disk (ObjectId = "{1}\\SSXX\root/Microsoft/Windows/Stor...)

Обновлено

Теперь я могу перенести информацию о диске в текстовое поле, но могу в текстовом поле не обновляется, если я выбираю другой элемент в выпадающем списке.

$Disk = New-Object system.Windows.Forms.ComboBox
$Disk.AutoSize = $true
$Disk.DropDownStyle = "DropDownList"

$Disk.Items.AddRange((get-partition|?{$_.DriveLetter}| select DiskNumber )) 
$SelectedFile = {
    $DiskSelected = $Disk.SelectedItem
    Write-Host "Disk Selected: $DiskSelected"

    $DiskNum = $DiskSelected -split "@{DiskNumber="
    $DiskNumber = $DiskNum -split "}"
    Write-Host "Disk Number:$DiskNumber"
    Get-Disk | Where-Object -FilterScript {$_.Number -Eq "$DiskNumber"} | Select FriendlyName, BusType, Size | Export-Csv 'Temp.csv' -NoType
    $TextBox1.AppendText((Get-Content -Path ".\Temp.csv"))
}

$Disk.add_SelectedIndexChanged($SelectedFile)
$Disk.DisplayMember = 'Name'

$TextBox1 = New-Object system.Windows.Forms.TextBox
$TextBox1.multiline = $true
$TextBox1.WordWrap = $true
$TextBox1.BackColor = "#F5F5F5"
$textsize = ($width / 130)
$FontText = New-Object System.Drawing.Font("Calibri",$textsize,[System.Drawing.FontStyle]::Regular,[System.Drawing.GraphicsUnit]::Pixel)
$TextBox1.Font = $FontText

1 Ответ

1 голос
/ 23 марта 2020

Попробуйте это.

using namespace System.Windows.Forms
Add-Type -AssemblyName System.Windows.Forms

$partitions = Get-Partition | where DriveLetter

########## Controls ##########

$comboBox1 =[ComboBox]@{
    Location = "10,10"
    AutoSize = $true
    DropDownStyle = "DropDownList"
    DisplayMember = "DriveLetter"
}
$comboBox1.Items.AddRange($partitions)

$textBox1 = [TextBox]@{
    Location = "10,50"
    Size = "900,300"
    Anchor = "Left,Right,Top,Bottom"
    Multiline = $true
    WordWrap = $false
    ScrollBars = "Both"
    BackColor = "#F5F5F5"
    Font = "Consolas,10"
}

$form = [form]@{ Size = "940,400" }
$form.Controls.AddRange(@($comboBox1, $textBox1))


########## EventHandlers ##########

$comboBox1.add_SelectedIndexChanged{
    $selectedPartition = $comboBox1.SelectedItem
    $TextBox1.Text = @(
        $selectedPartition.DriveLetter + ":"
        Get-Disk -Partition $selectedPartition | Format-List | Out-String
    )
}

# Show form
[void]$form.ShowDialog()

Обратите внимание, что выбранный вами элемент является объектом, а не строкой.


updated

Попробуйте переписать следующую часть , Вы можете обновить весь текст на $TextBox1.Text = ... вместо $TextBox1.AppendText().

$Disk.Items.AddRange((get-partition|?{$_.DriveLetter}| select -ExpandProperty DiskNumber)) 
$SelectedFile = {
    $DiskNumber = $Disk.SelectedItem
    Write-Host "Disk Number:$DiskNumber"
    $TextBox1.Text = Get-Disk $DiskNumber | Select FriendlyName, BusType, Size | Out-String
}
...