请问各位高手我欲按左键也打开弹出菜单,如何???(50分)

  • 主题发起人 主题发起人 DELLy
  • 开始时间 开始时间
D

DELLy

Unregistered / Unconfirmed
GUEST, unregistred user!
请问各位高手我欲按左键也打开弹出菜单,如何???
 
popupmenu1.Popup(x,y);
 
popmunu1.trackbutton := tbleftbutton 即可
 
popmunu1.trackbutton := tbleftbutton
 
呵呵,好象不行,只对toolbar有效。
 
form的OnClickshi事件:
procedure TForm1.FormClick(Sender: TObject);
var p:tpoint;
begin
GetCursorPos(P);
popupmenu1.Popup(p.x,p.y);
end;
 
thanks very much!!!
 
时间太久,强制结束。 wjiachun
 
时间太久,强制结束。 wjiachun
 
时间太久,强制结束。 wjiachun
 
后退
顶部