Ver Mensaje Individual
  #4  
Antiguo 26-02-2009
Avatar de roman
roman roman is offline
Moderador
 
Registrado: may 2003
Ubicación: Ciudad de México
Posts: 20.269
Reputación: 10
roman Es un diamante en brutoroman Es un diamante en brutoroman Es un diamante en bruto
Tendrías que completar tus tipos de datos con un apuntador al registro:

Código Delphi [-]
type
  PItem = ^TItem;
  TItem = record
    ...
  end;

Entonces, manejarías los elementos del TList así:

Código Delphi [-]
var
  Item: TItem;

begin
  // Agregar un item (la @ es para pasar un puntero al Item y no el Item en sí)
  Lista.Items.Add(@Item);

  // Tomar un item (haces el moldeo con PItem en lugar de TItem)
  Item := PItem(Lista.Items[i])^;
end;

// Saludos
Responder Con Cita