Hola astwin, bienvenido al foro, como sugerencia puedes poner tu codigo dentro de etiquetas para sea mas legible.
Respecto a tu problema, lo que debes hacer es definir la TOut antes que TIn ... pero no completa
Te quedaria asi:
Código Delphi
[-]
type
TOut = class;
TIn=class
...
Cout : Tout;
...
end;
type TOut=class
...
vTIn : array of TIn;
...
end;
Suerte