Private lcName lcName = sys(2015) this.parent.addobject( lcName, "shape" ) with evaluate( "this.parent." + lcName ) .Top = mrow( this.parent.Caption, 3 ) .Left = mcol( this.parent.Caption, 3 ) .Visible = .t. endwithOddly it crashes on the form caption, saying "the window is not defined"