Club Builder

[Estela]

Hola a todos, tengo un pequeño problema y espero que me podais echar una mano.
Necesito crear TTabSheet con un TRichEdit dentro mediante codigo. Eso lo hago de esta manera (El PageControl (PgeProgramas) esta creado en tiempo de diseño):

TTabSheet *pPagina = new TTabSheet(this);
TRichEdit *pEdit = new TRichEdit(this);
pPagina->InsertControl(pEdit);
pPagina->PageControl = PgeProgramas;
pPagina->Caption = AnsiString("<Nuevo>");

Despues quiero acceder al RichEdit, lo hago de esta manera:

PgeProgramas->Pages[0]->Controls[0]->Align=alClient;

y funciona, pero si intento escribir lineas:

PgeProgramas->Pages[0]->Controls[0]->Lines->Add("Nueva linea");

Me indica que "Lines is not a member of TControl."
¿Como puedo insertar y leer lineas de este RichEdit?
Gracias!

[Scara]

Prueba a hacer esto:

TRichEdit * Editor=dynamic_cast<TRichEdit *>(PgeProgramas->Pages[0]->Controls[0]);
Editor->Lines->Add("Nueva linea");