掲示板システム
ホーム
アクセス解析
カテゴリ
ログアウト
TPointについて (ID:13966)
名前
ホームページ(ブログ、Twitterなど)のURL (省略可)
本文
ツールバーの子メニューって style:=tbsDropDownの事ですよね? popup menuを表示させたいだけなら、 DropdownMenuに適当なTpopupMenuを割り当てるだけでいけます。 真横(右)なら procedure TForm1.ToolButton1Click(Sender: TObject); var pos:TPoint; begin pos:=ToolButton1.ClientToScreen(Point(0,0)); PopupMenu1.Popup(pos.X+ToolButton1.Width,pos.Y); end;
←解決時は質問者本人がここをチェックしてください。
戻る
掲示板システム
Copyright 2021 Takeshi Okamoto All Rights Reserved.