掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
メインメニューのメニューアイテムを表示するには？ (ID:23136)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
こんな風にもできますよ procedure TForm1.FormDblClick(Sender: TObject); var uItem: integer; begin uItem := integer(TrackPopupMenu( MainMenu1.Items[0].Handle, //ポップアップする項目のハンドル TPM_LEFTALIGN or TPM_LEFTBUTTON or TPM_RETURNCMD, Mouse.CursorPos.X, Mouse.CursorPos.Y, 0, Form1.Handle, nil )); PostMessage(Form1.Handle, WM_COMMAND, uItem, 0); //選択されたコマンドをポスト end;
←解決時は質問者本人がここをチェックしてください。
更新する
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.