Hallo,

the following code show that RightClick in Page and Pageframe fires if user RightClick on the Tab of the Pageframe. Is that a bug or Feature ?

-Ibrahim

DEFINE CLASS form1 AS form


DoCreate = .T.
Caption = "Form1"
Name = "Form1"


ADD OBJECT pageframe1 AS pageframe WITH ;
ErasePage = .T., ;
PageCount = 2, ;
Top = 10, ;
Left = 5, ;
Width = 241, ;
Height = 169, ;
Name = "Pageframe1", ;
Page1.Caption = "Page1", ;
Page1.Name = "Page1", ;
Page2.Caption = "Page2", ;
Page2.Name = "Page2"


PROCEDURE pageframe1.RightClick
wait window prog()
ENDPROC


PROCEDURE pageframe1.Page1.RightClick
wait window prog()
ENDPROC


ENDDEFINE