窗口中的弹出式右键菜单-delphi源码.rar

时间:2022-07-30 13:12:15
【文件属性】:

文件名称:窗口中的弹出式右键菜单-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)

网友评论