文件名称:窗口中的弹出式右键菜单-delphi源码.rar
文件大小:6KB
文件格式:RAR
更新时间:2022-07-30 13:12:15
Delphi源码-界面编程
窗口中的弹出式右键菜单-delphi PopupMenu源码, procedure TForm1.Button1Click(Sender: TObject); var Poin:TPoint; begin Poin := Point(Button1.Left,Button1.Top Button1.Height); Poin := ClientToScreen(Poin); PopupMenu1.Popup(Poin.X,Poin.Y); end;
【文件预览】:
srcfans.com
----PopupMenu()
--------Project1.res(876B)
--------Unit1.dfm(870B)
--------Unit1.ddp(51B)
--------Project1.cfg(434B)
--------Unit1.pas(716B)
--------Project1.dpr(188B)
--------Project1.dof(3KB)
--------Unit1.dcu(4KB)