Foros Club Delphi - Error al crear una imagen en una funcion

Este es el codigo que tengo en una funcion:

Código:

TImage *NuevaImagen;

 NuevaImagen=new TImage(this);

 NuevaImagen->Parent=this;

 NuevaImagen->Top=240;

 NuevaImagen->Left=100;

 NuevaImagen->Height=129;

 NuevaImagen->Width=89;

Me da error en la segunda y tercera linea:
[C++ Error] Unit1.cpp(33): E2285 Could not find a match for 'TImage::TImage()'
[C++ Error] Unit1.cpp(34): E2297 'this' can only be used within a member function

Si lo pongo fuera de una funcion, en un boton por ejemplo, no da error.