for each loObject in thisform.Objects with loObject .Top = .Top + lnDeltaTop .Left = .Left + lnDeltaLeft endwith endfor>Thanks again for responding. In fact I had forgotten about this thread <g>. I was just recently experimenting with SetAllX and was thinking to use it to change all the top left with it, it's sample was able to do it, but haven't got around to trying it out yet.