OpenFileDialog使用後にメッセージを最前面に表示したい。

Question

前提・実現したいこと

powershellでファイル名を取得し、結果を表示するルーチンを作成しています。
OpenFileDialog を使用してファイルを取得していますが、取得後、メッセージボックスにその内容を表示し、確認を促しています。

発生している問題・エラーメッセージ

このメッセージボックスを最前面に表示し、OKボタンにフォーカスを当てたいのですが、できません。
（キーボードのEnterキーを押すだけで次に進みたいのです。）

該当のソースコード

function MessageBox([string]$title,[string]$labelText){

# フォーム全体の設定
  $form = New-Object System.Windows.Forms.Form
  $form.Size = New-Object System.Drawing.Size(400,300)
  $form.Text = $title
  $form.font = New-Object System.Drawing.Font("メイリオ",8)
  
# ラベルを表示
  $label = New-Object System.Windows.Forms.Label
  $label.Location = New-Object System.Drawing.Point(10,10)
  $label.Size = New-Object System.Drawing.Size(380,160)
  $label.Text = $labelText
  $form.Controls.Add($label)

# OKボタンの設定
  $OKButton = New-Object System.Windows.Forms.Button
  $OKButton.Location = New-Object System.Drawing.Point(150,170)
  $OKButton.Size = New-Object System.Drawing.Size(75,40)
  $OKButton.Text = "OK"
  $OKButton.DialogResult = [System.Windows.Forms.DialogResult]::OK
  $form.AcceptButton = $OKButton
  $form.Controls.Add($OKButton)

# フォームを表示
  $form.Add_Shown($OKButton.Select())
  $form.Topmost = $True
  $form.ShowDialog()
  return
}
  
function FileOpenDialog([string]$title,[string]$filter){
  $dialog = New-Object System.Windows.Forms.OpenFileDialog
  $dialog.Title = $title
  $dialog.Filter = $filter
  if ($dialog.Showdialog() -eq "OK") {
    return $dialog.FileName
  }else{
    return $null
  }
}

Add-Type -Assembly System.Windows.Forms
$fileName = FileOpenDialog "test"
$a = MessageBox "test" $fileName

試したこと

.NET Frameworkライブラリの[System.Windows.Forms.MessageBox]::Show()も試しましたが、ダメでした。

補足情報（FW/ツールのバージョンなど）

PSVersion 5.1.18362.752
PSEdition Desktop
PSCompatibleVersions {1.0, 2.0, 3.0, 4.0...}
BuildVersion 10.0.18362.752
CLRVersion 4.0.30319.42000
WSManStackVersion 3.0
PSRemotingProtocolVersion 2.3
SerializationVersion 1.1.0.1

Answer 1

.Add_Shown()の行を次のように変えるとうまくいきました。

$form.Add_Shown({ $form.Activate(); $OKButton.Select(); })

PowerShellでコントロール(GUIコンポーネント)にイベントハンドラを追加するにはAdd_イベント名()メソッドを使用します。スクリプトブロックを引数に渡すことで、イベントの発火時にその内容を呼び出すことができます。(公式Wiki)

フォームをアクティブにするためのメソッド.Activate()は公式ドキュメントによると呼び出しに必須条件があります。

このメソッドが効果を持つようにするには、フォームが表示されている必要があります。

Shownイベントが発火するのはフォームが表示されたあとのようなので、.Add_Shown()メソッドを使って.Activate()の呼び出しをフォームの表示後に遅らせることにより.Activate()の呼び出しの条件を満たすことができます。

Comments

[hamozo]

reosablo様ありがとうございました。
add_shownメソッドに $form.Activate();を追記することで解決しました。
$form.ShowDialog()の前に記載してみたのですが、こちらはダメでした。

[reosablo]

元の回答が不勉強だったのでちゃんと調べて編集機能で解説を追加しました。
`.ShowDialog()`を呼び出す前はフォームが非表示なので`.Activate()`を呼び出しても効果が無いようです。