[2489] Re^3: 通り道さん

投稿日 2019/09/24(Tue) 21:22:43
投稿者 通り道
参照先

こんばんは。

プロデルでは・・というより、Windows.Formsでは、以下のような感じで辿れそうです。
基本的には、プロデル自体に、参照できるようにしてもらった方がよさそうです。
(メニューは取れないんですが、古い形式のシンプルメニューはプロパティがあって、取得も設定もできるんですよね。)
このプログラムの場合、ウィンドウは、ただ、メニューを調べさせる対象を準備するためだけにあるのに近いです。
----------------------
Form型というドットネット型(「System.Windows.Forms.Form」)を作る
MenuStrip型というドットネット型(「System.Windows.Forms.MenuStrip」)を作る
ーーToolStripMenuItem型というドットネット型(「System.Windows.Forms.ToolStripMenuItem」)を作る
ToolStripDropDownItem型というドットネット型(「System.Windows.Forms.ToolStripDropDownItem」)を作る
Forms_MainMenuStripプロパティ情報は、Form型の管理型:"GetProperty"(「MainMenuStrip」)
MenuStrip_Itemsプロパティ情報は、MenuStrip型の管理型:"GetProperty"(「Items」)
ーーToolStripMenuItem_DropDownItemsプロパティ情報は、ToolStripMenuItem型の管理型:"GetProperty"(「DropDownItems」)
ToolStripDropDownItem_DropDownItemsプロパティ情報は、ToolStripDropDownItem型の管理型:"GetProperty"(「DropDownItems」)

窓というテスト窓を作る
窓を表示する
待機する

ーーメニュー項目を再帰的に辿る
【親メニュー項目】を項目色々する手順
 【型名】は、親メニュー項目の種類名
 もし、型名が空ならば、
  ーーこのケアをしないと、区切り線以外の型名(種類の名前)が取れない。インスタンスの名前は取れるのになぜ?
  型名は、(親メニュー項目:"GetType"())の"Name"
 もし終わり
  「[型名]:[親メニュー項目の名前]」を表示する
  もし、ToolStripDropDownItem型の管理型:IsInstanceOfType(親メニュー項目)でなければ、
   ーーこの型を継承していないと、DropDwonItemsが無い
   ーー多くの場合は、セパレータ(System.Windows.Forms.ToolStripSeparator)
   返る
  もし終わり
  【メニュー項目一覧】は、ToolStripDropDownItem_DropDownItemsプロパティ情報:"GetValue"(親メニュー項目)
  メニュー項目一覧を【メニュー項目】へそれぞれ繰り返す
   メニュー項目を項目色々する
  繰り返す終わり
終わり

ーーウィンドウから、メインメニューストリップを取得して、トップメニューの分だけ繰り返す
【親ウィンドウ:ウィンドウ】を色々する手順
  【メインメニュー】は、Forms_MainMenuStripプロパティ情報:"GetValue"(親ウィンドウ)
  【トップメニュー項目一覧】は、MenuStrip_Itemsプロパティ情報:"GetValue"(メインメニュー)
  トップメニュー項目一覧を【トップメニュー項目】へそれぞれ繰り返す
   トップメニュー項目を項目色々する
  繰り返す終わり
終わり
 
テスト窓とは
  ウィンドウを継承する
はじめの手順
    初期化する
    ーー貼り付けた部品に対する操作をここに書きます
  終わり
初期化する手順
  ーー自動生成された手順です。ここにプログラムを書き加えても消える場合があります
  この内容を「テスト窓」に変える
  ボタン1というボタンを作る
    その位置と大きさを{82,132,105,27}に変える
    その内容を「ボタン1」に変える
    その移動順を3に変える
  ラベル1というラベルを作る
    その位置と大きさを{12,93,39,12}に変える
    その内容を「ラベル1」に変える
    その移動順を2に変える
  テキスト1というテキストを作る
    その位置と大きさを{113,90,139,19}に変える
    その移動順を1に変える
  メニュー1というメニューを作る
    その位置と大きさを{0,0,284,24}に変える
    その内容を「メニュー1」に変える
    その移動順を4に変える
    ファイルToolStripMenuItemというメニュー項目をメニュー1へ追加する
      その内容を「ファイル」に変える
      開くToolStripMenuItemというメニュー項目をメニュー1のファイルToolStripMenuItemへ追加する
        その内容を「開く」に変える
      閉じるToolStripMenuItemというメニュー項目をメニュー1のファイルToolStripMenuItemへ追加する
        その内容を「閉じる」に変える
      ToolStripSeparator1という区切り線部品をメニュー1のファイルToolStripMenuItemへ追加
        その大きさを{101,6}に変える
      終了ToolStripMenuItemというメニュー項目をメニュー1のファイルToolStripMenuItemへ追加する
        その内容を「終了」に変える
    編集ToolStripMenuItemというメニュー項目をメニュー1へ追加する
      その内容を「編集」に変える
      RedoUndoToolStripMenuItemというメニュー項目をメニュー1の編集ToolStripMenuItemへ追加する
        その表示を○に変える
        その内容を「Redo/Undo」に変える
        UndoToolStripMenuItemというメニュー項目をメニュー1の編集ToolStripMenuItemのRedoUndoToolStripMenuItemへ追加する
          その内容を「Undo」に変える
        RedoToolStripMenuItemというメニュー項目をメニュー1の編集ToolStripMenuItemのRedoUndoToolStripMenuItemへ追加する
          その内容を「Redo」に変える
      ここToolStripMenuItemというメニュー項目をメニュー1の編集ToolStripMenuItemへ追加する
        その表示を○に変える
        その内容を「ここ」に変える
    ヘルプToolStripMenuItemというメニュー項目をメニュー1へ追加する
      その内容を「ヘルプ」に変える
      "あばうとToolStripMenuItem"というメニュー項目をメニュー1のヘルプToolStripMenuItemへ追加する
        その内容を「あばうと」に変える
終わり

ボタン1がクリックされた時の手順
    これを色々する
  終わり
終わり


関連一覧ツリー

をクリックするとツリーを一括表示します)

返信フォーム

(この投稿に返信する場合は下記フォームから投稿して下さい)
(1MBまで)
(英数字で8文字以内)

- 投稿修正/削除フォーム -
処理 No パスワード

▲ページの先頭へ

- WebForum -