$nVPos = $rTarget->Top; $nHPos = $rTarget->Left; #### $picCurrent->{Top} = $rTarget->{Top}; $picCurrent->{Left} = $rTarget->{Left};