tstringgrid's objects..how to..

I need Button which move like the cell of a tstringgrid on a tstringgrid..
(sorry my english is not very good)..

I've insert my button in the object porperty off a cell
(.object[1,1]:=tbutton) and initialize the left and top property off the
button. When I use the scroll bar of the tstringgrid the buton move well at
the beginning but is not repaint well in most cases.

Is there a way to solve this problem simply (especially without programming
by myself the repainting or the
coordinates of the button ) ?