PUBLIC mypathname mypathname=CREATEOBJECT("mypathname") mypathname.Name = "anothername" mypathname.Show(1) RELEASE someName DEFINE CLASS mypathname AS form Name = "mypathname" ADD OBJECT command1 AS commandbutton WITH ; Top = 44, ; Left = 170, ; Height = 27, ; Width = 84, ; Caption = "Command1", ; Name = "Command1" PROCEDURE command1.Click * when eval("thisform.name") # thisform * expected Hierarchy is _SCREEN.forms[currentFormindex]..... or empty MESSAGEBOX(SYS(1272,m.this),0,"Object Hierarchy") MESSAGEBOX(TYPE(SYS(1272,m.this)),0,"return datatype") ENDPROC ENDDEFINE