Private lcName lcName = sys(2015) backcolor = 255 Backstyle = 0 thisform.addobject( lcName, "shape" ) with GETPEM(thisform,lcName) .Move(mcol(thisform.Name, 3),mrow( thisform.Name, 3 )) && the form name should to be unique .Visible = .t. endwithHowever, it's position on the screen is controlled by Mcol and Mrow and the form I have contains the image of a map that exceeds the screen size. Therefore, I am searching for a solution that uses coordinates. CurrentX and CurrentY might work. I'll try that.