タグ
  Active Directory (51)
  ANSI (1)
  bash (1)
  BAT (14)
  bind (1)
  CentOS (3)
  CSharp (1)
  C言語 (4)
  DNS (3)
  Excel (1)
  Fedora (4)
  FreeBSD (3)
  iSCSI (1)
  Java (11)
  JavaScript (6)
  Link (4)
  Linux (15)
  Mail (1)
  Microsoft (4)
  NIS (1)
  OpenLDAP (2)
  OpenSolaris (4)
  PHP (2)
  PostgreSQL (2)
  PowerShell (33)
  RFC (3)
  Solaris (10)
  SQL Server (1)
  Ubuntu (3)
  VBScript (65)
  Visual Basic (1)
  VMware (2)
  Windows (14)
  WMI (16)
  WSF (5)
  WSH (10)
  作成中 (5)
  慣用句 (1)
  正規表現 (6)
PowerShell で Windows フォームを表示するサンプル
フォームを表示するサンプルです。
Function Open-Dialog(){
  [void][reflection.assembly]::LoadWithPartialName("System.Windows.Forms")

  # メニューバー
  $mymi1 = New-Object Windows.Forms.MenuItem("File")
  $mymi1_1 = New-Object Windows.Forms.MenuItem("Open")
  $mymi1_2 = New-Object Windows.Forms.MenuItem("Save")
  $mymi1_3 = New-Object Windows.Forms.MenuItem("Close")
  $myms = New-Object Windows.Forms.MenuItem("-")
  $res = $mymi1.MenuItems.Add($mymi1_1)
  $res = $mymi1.MenuItems.Add($mymi1_2)
  $res = $mymi1.MenuItems.Add($myms)
  $res = $mymi1.MenuItems.Add($mymi1_3)
  $mymi2 = New-Object Windows.Forms.MenuItem("Data")
  $mymainmenu = New-Object Windows.Forms.MainMenu
  $res = $mymainmenu.MenuItems.Add($mymi1)
  $res = $mymainmenu.MenuItems.Add($mymi2)

  # ボタン
  $myb1 = New-Object Windows.Forms.Button
  $myb1.Text = "OK"
  $myb1.Location = New-Object Drawing.Point(10,50)
  $myb2 = New-Object Windows.Forms.Button
  $myb2.Text = "Cancel"
  $myb2.Location = New-Object Drawing.Point($myb1.left, ($myb1.top + $myb1.height + 10))

  # ツールバー
  $mytbb1 = New-Object Windows.Forms.ToolBarButton
  $mytbb1.Text = "Open"
  $mytbb2 = New-Object Windows.Forms.ToolBarButton
  $mytbb2.Text = "Save"
  $mytb = New-Object Windows.Forms.ToolBar
  $res = $mytb.Buttons.Add($mytbb1)
  $res = $mytb.Buttons.Add($mytbb2)

  $myform = New-Object Windows.Forms.Form
  $myform.Text = "Original PowerShell Form"
  $myform.FormBorderStyle = [Windows.Forms.FormBorderStyle]::Sizable
  $myform.AcceptButton = $myb1
  $myform.CancelButton = $myb2
  $myform.StartPosition = [Windows.Forms.FormStartPosition]::CenterScreen

  $myform.Menu = $mymainmenu
  $myform.Controls.Add($mytb)
  $myform.Controls.Add($myb1)
  $myform.Controls.Add($myb2)
  $res = $myform.ShowDialog()
}
参照

Button クラス | Form クラス

タグ: PowerShell
[リロード] [記事修正] [新規作成] [使用方法]
©2004-2010 UPKEN