Delphi - OBJETO DENTRO DE OTRO OBJETO

Hola a todos:

Estoy desarrollando una aplicación, donde necesito tener un objeto dentro de otro. Lo he implementado de la siguiente forma:

He creado un objeto "principal", con sus variables y métodos, y he añadido una variable tipo puntero dentro del objeto principal, que apunta al otro tipo de objeto. Gráficamente, he implementado lo siguiente:

// ---------------------------------
ClaseB= Class
VariableX:...
VariableY: ...
...
Procedure A...
...
End; // ClaseB

ClaseA= Class
Variable1: ...
Variable2: ...
...................
VariableN: ^ClaseB;

Procedure1...
Procedure2...
end;
// ---------------------------------

El problema que me encuentro es que intento inicializar B dentro de un procedimiento de A, de la forma:

// ---------------------------------
Procedure A.Create
begin
...
VariableN:= @ClaseB.Create;

{*}VariableN^.Inicializar; // Esta sentencia me da error

end;
// ---------------------------------

La sentencia marcada con {*} me da error y no sé por qué. Creo que sintácticamente es correcto, pero no sé qué es lo que sucede.
Por supuesto que tengo definida la función "B.Inicializar"

Os agradecería vuestra ayuda.

Muchas gracias por adelantado.
Un saludo.

Las variables declaradas como clases ya son punteros.

Creo que ahí está la cuestión. Yo sacaría el ^ de todo el asunto.

Gracias por tu sugerencia M@rceloL. Voy a darle vueltas al asunto.

Un saludo.