- お知らせ -
  • 当wikiのプログラムコードの表示を直してみました(ついでに長い行があると全体が下にぶっ飛ぶのも修正)。不具合があればBBSまでご連絡下さい。

ボタンクリックでPopupMenuを出したい場合 Edit

1
2
3
4
5
6
procedure TForm1.ButtonClick;
var Pos: TPoint;
begin
  GetCursorPos(Pos);
  PopupMenu.Popup(Pos.X, Pos.Y);
end;



Front page   Edit Freeze Diff Backup Upload Copy Rename Reload   New Pages Search Recent changes   Help   RSS of recent changes
Last-modified: 2006-04-24 Mon 22:59:42 JST (4865d)