Como hacer una lista enlazada dinamica en delphi

[[maeyanes]]

Hola...

A que te refieres con que Delphi es pura referencia?

Ahora, como ya te han mencionado, Delphi cuenta con algunas clases que resuelven lo que necesitas. Checa la unidad Contnrs, ahí vienen implementadas las estructuras de pilas, colas, listas ordenadas, etc...

Ya con esas clases básicas puedes heredar para hacer lo que desees...

Ahora te pongo un ejemplo de como hacer una lista con estructuras record:

Código Delphi [-]
type
  PRegistro = ^TRegistro;

  TRegistro = record
    Data: Variant;
  end;

// Ejemplo de uso con un objeto TList:
var
  RegistroList: TList;
  Registro: PRegistro;

begin
  RegistroList := TList.Create;
  New(Registro);
  Registro^.Data := 'Hola mundo';
  RegistroList.Add(Registro);
  New(Registro);
  Registro^.Data := 23;
  RegistroList.Add(Registro);
  // Vamos a recorrer la lista:
  for I := 0 to RegistroList.Count - 1 do
    ShowMessage(PRegistro(RegistroList[i])^.Data);
  // Liberamos la memoria:
  for I := 0 to RegistroList.Count - 1 do
    Dispose(PRegistro(RegistroList[i]));
  RegistroList.Clear;
  RegistroList.Free
end;

Saludos...