Estou trabalhando com delphi. Eu tenho TImage, ao qual atribuo um bitmap.

imgmain.Picture.Bitmap := bmpMain;
imgmain.Picture.Bitmap.PixelFormat := pf24bit;

imgmain é objeto de TImage e bmpMain é objeto de TBitmap

Quero ampliar minha imagem. Eu tenho uma trackbar no meu formulário e, quando clico na trackbar, a imagem deve ser ampliada. O que devo fazer?
Obrigado.

Editar:
Encontrei alguma solução emaqui Funciona, mas corta minha imagem.