PROCEDURE oVScroll.Change with thisform if ( .imgZoom.Height > .Height ) .imgZoom.Top = - ( this.object.Value / 100 ) * ( .imgZoom.Height - .Height ) endif endwith ENDPROC PROCEDURE oHScroll.Change with thisform if ( .imgZoom.Width > .Width ) .imgZoom.Left = - ( this.object.Value / 100 ) * ( .imgZoom.Width - .Width ) endif endwith ENDPROC>Thanks. Do you have an example on how to use it?