Pues si como veo es el código que te expuse, lo que te falta es asignar las funciones de los eventos del ratón a los eventos de ratón de TImage.
En el Form selecciona el TImage. En el Object Inspector selecciona events del TImage. Busca OnMouseDown, OnMouseUp y OnMouseMove y vete asignando cada uno a las funciones que deben manejarlos (FormMouseDown, FormMouseUP y FormMouseMove).
Saludos.