[DelphiRat]

Mi objeto ListaSimple (equivale a oMensajes) es del tipo de estructura de una 'Cola', la función push equivale a insertar_al_final. Mi objeto ListaDoble (equivale a oTemas) es una lista de doble enlace común. Mi varibale nuevoMensaje es del tipo puntero a registro (para guardarse en ListaSimple). Mi variable nuevoTema es del tipo puntero a registro (para guardarse en ListaDoble).

Código Delphi [-]
//Creo objeto ListaSimple...
oMensajes:=cCola.create;
//Inserto campos en el registro que se guardará en ListaSimple...
new(nuevoMensaje);
nuevoMensaje^.mensaje:=MeMensaje.Text;
nuevoMensaje^.autor:=FrmInicio.EdUser.Text;
nuevoMensaje^.fecha:=DateTimeToStr(Today);
//Inserto el registro en ListaSimple....
oMensajes.push(nuevoMensaje);
//Inserto ListaSimple como campo de un registro a ListaDoble...
nuevoTema^.mensajes:=oMensajes;
//Destruyo mi objeto ListaSimple...
oMensajes.destroy;
//Inserto registro (que incluye mi objeto ListaSimple) a ListaDoble...
oTemas.insertar_al_final(nuevoTema);

Mi declaración de mi registro Tema es:

Código Delphi [-]
rTema = record
  ..
  ..
  ..
  mensajes: cCola;
  end;

No hay problema con esa declaración, ¿verdad?

Bueno, ahí está lo importante de mi código. Lo que busco es la sintaxis para leer lo guardado (como se explica en el primer mensaje).