If nButton = 1 AND VARTYPE(Sys(1270))=='O' AND Sys(1270)=m.this Thisform.AddObject( Sys(2015), "shape") With Thisform.Controls[thisform.ControlCount] .Move(nXCoord,nYCoord,25,25) .Curvature = 99 .BackColor = 255 .BackStyle = 1 .borderwidth = 2 .bordercolor = 65535 .SpecialEffect = 0 .ToolTipText = "Crime scene" .Visible = .T. Endwith EndifHowever, a user would only place one shape on the map every day or two. So, when the application is started a second, third, or fourth time the user opens a table and the coordinates of previous shapes on the map are available for loading and display of the shapes. I have the file loading code written.