Ver Mensaje Individual
  #9  
Antiguo 21-10-2003
Avatar de jachguate
jachguate jachguate is offline
Miembro
 
Registrado: may 2003
Ubicación: Guatemala
Posts: 6.254
Reputación: 30
jachguate Va por buen camino
Cool

Todo lo dicho anteriormente está perfecto. Solamente para ampliar el concepto de la propiedad Objects... no solo podes almacenar un puntero a una instancia de un objecto. Podria ser un puntero a cualquier estructura en realidad.

De manera que siempre valdria hacer algo como:

Código:
Type 
  REmpleado = record
     Numero : Integer;
     Nombres : String[100];
     Apellidos : String[100];
     etc.
  End;

  PEmpleado = ^REmpleado;

Var
  Empleado : PEmpleado;
  
Begin
  ..

  Empleado := New(PEmpleado);
  Empleado^.Numero := 84;
  Empleado^.Nombres := 'mate';
  Empleado^.Apellidos := 'amargo';
  ListBox.Items.Add('amargo mate', Empleado);
End;
al momento de liberarlo, por supuesto deberás utilizar (Dispose(empleado));

Hasta luego.

__________________
Juan Antonio Castillo Hernández (jachguate)
Guía de Estilo | Etiqueta CODE | Búsca antes de preguntar | blog de jachguate
Responder Con Cita