Classの中に 作成したフォーム内のコントロールのイベントで 別のコントロールにアクセスしたい。

Question

前提・実現したいこと

Class の中でFormを扱いたいです。
その際にForm内のコントロールのイベントも設定したいのですが
イベントを発生させたコントロールにはアクセスできたのですが
その他のコントロールへのアクセス方法が分かりません。

どうしたらいいでしょうか?

該当のソースコード

例えばですが$TxBox1の値が変更されたら$TxBox2の値も変更したいのですが
出来ません。

Using NameSpace System.Windows.Forms

Class MyForm
{
    [Form] $Form = [Form]::new()
    [TextBox] $TxBox1 = [TextBox]::new()
    [TextBox] $TxBox2 = [TextBox]::new()
    [SplitContainer] $SplitContainer = [SplitContainer]::new()


    
    hidden [scriptblock] $Form_Resize = 
    {
        [SplitContainer]$SplitContainer = $This.Controls | where { $_.GetType().Name -eq "SplitContainer" }
        $SplitContainer.Size = $This.ClientSize
    }

    hidden [scriptblock] $SplitContainer_Resize = 
    {
        [TextBox]$TxBox1 = $This.Panel1.Controls[0]
        [TextBox]$TxBox2 = $This.Panel2.Controls[0]

        $TxBox1.Size = $This.Panel1.ClientSize
        $TxBox2.Size = $This.Panel2.ClientSize
    }

    hidden [scriptblock] $Change = 
    {
        <#
            TxBox1 の値が変更されたら
            TxBox2 の値も同様に設定したい
            でも$Thisだと自身しか拾えない
        #>
        Write-host $This.Text
    }



    MyForm()
    {
        $This.Form.Controls.Add($This.SplitContainer)
        $This.SplitContainer.Panel1.Controls.Add($This.TxBox1)
        $This.SplitContainer.Panel2.Controls.Add($This.TxBox2)

        $This.Form.Add_Resize($This.Form_Resize)
        $This.SplitContainer.Add_SplitterMoved($This.SplitContainer_Resize)
        $This.TxBox1.Add_TextChanged($This.Change)

    }

    [void] ShowDialog()
    {
        $This.Form.ShowDialog()
    } 
}

$Form = [MyForm]::new()

$Form.ShowDialog()

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

Win10

Answer 1

Control.FindForm Method でそのコントロールの所属するフォームを取得できます。みつかったのは Form 型なので、それを MyForm にキャストすれば TxBox2 が使えると思います。

追記

Form を継承してみました。ついでに Anchor を使うようにしました。

Using NameSpace System.Windows.Forms

Class MyForm : Form
{
	[TextBox] $TxtBox1 = [TextBox]::new()
	[TextBox] $TxtBox2 = [TextBox]::new()
	[SplitContainer] $SplitContainer = [SplitContainer]::new()

	MyForm()
	{
		$AnchorLeftTopRight = [AnchorStyles]::Left + [AnchorStyles]::Top + [AnchorStyles]::Right

		$This.Controls.Add($This.SplitContainer)
		$This.SplitContainer.Width = $This.ClientSize.Width
		$This.SplitContainer.Anchor = $AnchorLeftTopRight

		function AddTextBox
		{
			Param([Panel]$Panel, [TextBox]$TextBox, [ScriptBlock]$Script)
			$Panel.Controls.Add($TextBox)
			$TextBox.Width = $Panel.ClientSize.Width
			$TextBox.Anchor = $AnchorLeftTopRight
			$TextBox.Add_TextChanged($Script)
		}

		AddTextBox $This.SplitContainer.Panel1 $This.TxtBox1 {
			$This.FindForm().TxtBox2.Text = $This.Text
		}

		AddTextBox $This.SplitContainer.Panel2 $This.TxtBox2 {
			$This.FindForm().TxtBox1.Text = $This.Text
		}
	}
}

$Form = [MyForm]::new()

$Form.ShowDialog()

Comments

[kamikazelight]

一先ずFormは無事取得出来たのでControlsから探せば操作は出来るようになったのですが
>>Form 型なので、それを MyForm にキャスト
がよくわかりません。
Formから所属しているクラスが取得できるのでしょうか?
教えて頂きたいです。 お願い致します。

[Zuishin]

[MyForm]$MyForm = $Form でキャストできますが、もしかするとキャストしなくても使えるかもしれません。ある程度大きなものは C# で作るので Class はまだ使ったことがないのです。

[kamikazelight]

できないです...
-as とかも試したのですがだめです
[MyForm]クラスの中の複数あるインスタンスプロパティーのうちの一つがForm型 ってだけなのですが
Form型から その[MyForm]クラスへのキャストは本当にできるのでしょうか?

[Zuishin]

おっと、MyForm は Form から派生したものだと思い込んでいました。できませんね。

ではみつかった Form の Controls プロパティから見つけるのはどうでしょうか？
https://docs.microsoft.com/ja-jp/dotnet/api/system.windows.forms.control.controls?view=netframework-4.7.2

TxtBox2 の Name プロパティを設定しておくと、それで特定できると思います。

[kamikazelight]

わかりました。
教えて頂いた内容から
コントロールから上位オブジェクトが取得できることが分かったので
改めて確認してみたらparentも使えることが分かったので
状況に応じてControl.FindForm Methodと合わせて使っていきたいと思います。
ありがとうございました。

[Zuishin]

Parent ではなく FindForm() をお伝えしたのは、Parent は Panel になると思ったからです。階層が浅ければ Parent でいいですね。

[kamikazelight]

ありがとうございます。
Parentはすこし時間をかければ自分で見つけられたかもしれないですが、
Control.FindForm Method は見つけられなかったと思います。
選べる選択肢が増えたのでとてもありがたいです。

＞＞MyForm は Form から派生したものだと思い込んでいました。
の Form から派生させてMyForm を作るという発想が無かったのでとても興味深いです。

もしもForm から派生させてMyForm を作成した場合
今の内容と同じフォームを表示されることが出来て、尚且つ
[MyForm]$MyForm = $This.FindForm()
＄MyForm.TxBox1 = "値"
のようなことが出来るのでしょうか
可能ならば新しい質問を投稿致しますので 是非教えて頂きたいです。

[Zuishin]

$MyForm.TxtBox1.Text = "値" のようにできます。というか C# で作るときには Form をそのまま使うことはほぼなくて、ほとんど Form の派生クラスを操作します。

[Zuishin]

別に質問を立てなくても、この回答に追記しますので少し待ってください。

[kamikazelight]

分かりました。お世話になります。

[Zuishin]

追記しましたが、キャストしなくても使えるようでした。

[kamikazelight]

ありがとうございます。やってみます

[kamikazelight]

継承ってこんなにいいものだったんですね
ここ最近気になっていた問題が解決できそうです。
ありがとうございました。

あと.Anchorも助かりましたいままで[DockStyle]？かなにかを使ったことはあったのですが隙間を開けたいとき出来なかったのでイベントで書いていました。
またよろしくお願いいたします。

Answer 2

連動させるコントロールがひとつなら、Tagプロパティに対象のコントロールを入れておくのではだめなんでしょうか。

該当部分のみ記述。

    $Change = {
        $This.Tag.Text = $This.Text
    }

    MyForm() {
        $This.TxBox1.Tag = $This.TxBox2
    }

コントロールを探す方法を知りたいって意図もあるのだろうと思いつつ。

Comments

[kamikazelight]

すみません 返事が投稿したつもりで出来ていませんでした。
遅くなりましたが回答ありがとうございました。
Tagもいろいろ試してみたのですが
コンストラクターで
$this.TxBox1.Tag = $this
っとしておけばコントロールが複数あっても
クラスのプロパティーで定義していれば
Write-host $This.Tag.TxBox2.Text
という感じで気軽にアクセスできました。
tag を使う方法も捨てがたいですね...
ありがとうございました。

[kamikazelight]

プロパティーはもちろん
メソッドにもアクセスできますね...
コントロールの量に応じて使わせていただきます。
次も宜しくお願い致します。