Delphi/C++ Builder で Button でポップアップメニュー
Delphi 2010 の TButton (TCustomButton) に DropDownMenu プロパティが追加されて、ボタン→ポップアップメニューてのが、あっさり実現するのかとおもいきや Windows Vista 以降のみでしか使えない(Helpにも書いてある) ということで procedure TForm1.Button1Click(Sender: TObject); begin with (Sender as TButton) do begin PopupMenu1.Popup(ClientOrigin.X, ClientOrigin.Y + Height); end; end; という風に TButton の ClientOrign を使うと、けっこう簡単に位置決めができる