Dar zoom em imagem e exibir local clicado.

Gostaria de saber como faço para dar zoom em uma imagem e exibir o local onde foi clidado.

Fiz o seguinte código:

//O image está com a propriedade strech = True Image2.Width := trunc( Image2.Width + Image2.Width (10/100)); Image2.Height := trunc( Image2.Height + Image2.Height (10/100));

Com o código acima o image sempre é exibido com top e left = 0 que é o padrão.

Fiz um outro código que centraliza a imagem, mas ainda não é isso que quero.