PowerShell怎样给列表项添加双击和中键事件？

5i365

下面的代码能显示 可多选的列表框

存在两个问题:
1.不管用下面的哪种方法,窗体底部都有空白, 如何去除? 我想尽量使用第2种方法
$listBox.Size = '160,260'
或
$listBox.Dock = 'Fill'



2.我已经将窗体中的OK按钮删除了, 我想:
A.当选中了一个列表项时: 鼠标双击, 实现OK按钮的功能
B.当选中了多个列表项时: 按下鼠标中键, 实现OK按钮的功能


这样一搞, 感觉干净利索, 尤其是列表项很多时, 点OK按钮不太方便

1. Add-Type -AssemblyName System.Windows.Forms
   
2. 
   
3. $form = New-Object System.Windows.Forms.Form
   
4. $form.Text = '双击查询'
   
5. $Form.FormBorderStyle = "FixedToolWindow"
   
6. $form.StartPosition = 'CenterScreen'
   
7. $form.Font = New-Object System.Drawing.Font("微软雅黑", 10, [Drawing.FontStyle]::Bold)
   
8. $form.ClientSize = '160, 260'
   
9. 
   
10. $listBox = New-Object System.Windows.Forms.Listbox
    
11. $listBox.Size = '160,260'
    
12. $listBox.SelectionMode = 'MultiExtended'
    
13. $listBox.DataSource = '张三', '李四', '王五', '赵六'
    
14. $form.Controls.Add($listBox)
    
15. 
    
16. $result = $form.ShowDialog()
    
17. if ($result -eq [System.Windows.Forms.DialogResult]::OK)
    
18. {
    
19.         $selectedItems = $listBox.SelectedItems
    
20. }

复制代码

flashercs

1. Add-Type -AssemblyName System.Windows.Forms
   
2. 
   
3. [system.Windows.forms.form]$form = New-Object System.Windows.Forms.Form
   
4. $form.Text = '双击查询'
   
5. $Form.FormBorderStyle = "FixedToolWindow"
   
6. $form.StartPosition = 'CenterScreen'
   
7. $form.Font = New-Object System.Drawing.Font("微软雅黑", 10, [Drawing.FontStyle]::Bold)
   
8. $form.ClientSize = '160, 260'
   
9. 
   
10. $listBox = New-Object System.Windows.Forms.Listbox
    
11. # $listBox.Size = '160,260'
    
12. $listBox.Dock = 'Fill'
    
13. $listBox.SelectionMode = 'MultiExtended'
    
14. $listBox.DataSource = '张三', '李四', '王五', '赵六'
    
15. $form.Controls.Add($listBox)
    
16. $form.add_FormClosing( {
    
17.     param($oSender, $oArgs)
    
18.     $oArgs.Cancel = $listBox.SelectedItems.Count -eq 0
    
19.     $Script:selectedItems = $listBox.SelectedItems
    
20.   })
    
21. 
    
22. $result = $form.ShowDialog()
    
23. $Script:selectedItems

复制代码

必须选择至少一个对象才能退出窗口;

5i365

回复 2# flashercs


双击没有反应

went

1. Add-Type -AssemblyName System.Windows.Forms
   
2. 
   
3. $form = New-Object System.Windows.Forms.Form
   
4. $form.Text = '双击查询'
   
5. $Form.FormBorderStyle = "FixedToolWindow"
   
6. $form.StartPosition = 'CenterScreen'
   
7. $form.Font = New-Object System.Drawing.Font("微软雅黑", 10, [Drawing.FontStyle]::Bold)
   
8. $form.ClientSize = '160, 260'
   
9. 
   
10. $listBox = New-Object System.Windows.Forms.Listbox
    
11. $listBox.Size = '160,260'
    
12. $listBox.SelectionMode = 'MultiExtended'
    
13. $listBox.DataSource = '张三', '李四', '王五', '赵六'
    
14. $form.Controls.Add($listBox)
    
15. 
    
16. $Script:selectedItems = $null
    
17. 
    
18. $listBox.add_DoubleClick({
    
19.     if($listBox.SelectedItems.Count -ne 1){ return }
    
20.     $Script:selectedItems = $listBox.SelectedItems
    
21.     $form.Close()
    
22. })
    
23. $listBox.add_MouseDown({
    
24.     if($_.Button -ne 'Middle'){ return }
    
25.     $Script:selectedItems = $listBox.SelectedItems
    
26.     $form.Close()
    
27. })
    
28. 
    
29. $result = $form.ShowDialog()
    
30. 
    
31. 
    
32. $Script:selectedItems

复制代码

5i365

回复 4# went

感谢大侠帮忙,没想到$_还能用在事件中!


列表框下边的空白无解吗?

went

回复 5# 5i365


    listbox的高没必要和form相同，调大一点，260改成300