version 6.50 0 Form1 238 268 1 Door.dll 1 Door.dll 1 Obj1:Object 0 Sub designer addform(Form1,"Form1","",220,220,220)@ addpanel(form1,Panel1,55,35,150,105,255,255,255,True,True)@ addlabel(panel1,Label1,40,35,75,25,"Label1",200,200,200,0,0,0,True,True,9)@ addbutton(form1,Button1,95,160,75,23,"Button1",212,208,200,0,0,0,True,True,9)@ End Sub @EndOfDesignText@ Sub Globals 'Declare the global variables here. End Sub Sub App_Start Form1.Show Obj1.New1(False) Obj1.FromControl("Button1") Obj1.Value = Obj1.GetProperty("Parent") btnparent = Obj1.GetProperty("propName") Obj1.FromControl("Label1") Obj1.Value = Obj1.GetProperty("Parent") lblparent = Obj1.GetProperty("propName") Msgbox("Button1 parent is " & btnparent & CRLF & "Label1 parent is " & lblparent) End Sub