Grady,

change the code to this:

lcName = sys(2015)
thisform.AddObject( lcName, "shape" )

with evaluate( "thisform." + lcName )
   .Top = mrow( thisform.Caption, 3 )
   .Left = mcol( thisform.Caption, 3 )
   .Visible = .t.
endwith

>I got it to work fine in a form too. Is there a way to make it run in the click method of the image?