右键按下的事件是什么？

是不是包括在ｃｌｉｃｋ中的？那样的话该如何判断？ 问题点数：10、回复次数：4Top

1 楼Liujc（阿聪）回复于 2002-04-19 15:20:50 得分 3

在OnMouseDown事件中判断  
    if   Button   =   mbRight   then   //右键Top

2 楼jamsir（果酱）回复于 2002-04-19 15:23:12 得分 0

onclickTop

3 楼zswang（伴水清清)(专家门诊清洁工）回复于 2002-04-19 15:23:15 得分 5

procedure   TForm1.FormMouseDown(Sender:   TObject;   Button:   TMouseButton;  
      Shift:   TShiftState;   X,   Y:   Integer);  
  begin  
      if   Button   =   mbRight   then  
          ShowMessage('测试1');  
  end;  
  //or  
  procedure   TForm1.FormContextPopup(Sender:   TObject;   MousePos:   TPoint;  
      var   Handled:   Boolean);  
  begin  
      ShowMessage('测试2');  
  end;  
  Top

4 楼make11111（孙少平）回复于 2002-04-19 15:23:26 得分 2

if   Button   =   mbRight   then   //右键Top

相关问题

• 测试
• 右键
• 事件
• tform1
• showmessage
• 判断
• tobject
• mbright then
• sender
• begin

• 帖主：tohell
• Liujc
• zswang
• make11111

• Delphi类图书
• Delphi类源码下载
• Delphi控件下载