Cita:
Posteado originalmente por mateamargo
[...]había estado mirando la propiedad addobject pero no entendìa como se usaba ahora me ayudaste con dos temas.
|
Sin embargo del uso particular que expuse no queda muy claro:
Objects es una arreglo paralelo a Items que permite asociar a cada item un objeto. Si te fijas, cada elemento del arreglo Objects es de tipo TObject.
Como un TObject es en realidad un puntero y ocupa 4 bytes, lo mismo que un Integer, se puede hacer el "casting" para tratar al puntero como un entero.
Si requirieses guardar más información del empleado además de su número podrías entonces definir una clase:
Código:
TEmpleado = class
Numero: Integer;
Nombre: String;
Apellido: String;
Sueldo: Double;
Ingreso: TDateTime;
end;
y asignar un objeto de esta clase:
Código:
Empleado := TEmpleado.Create;
Empleado.Numero := 84;
Empleado.Nombre := 'mate';
Empleado.Apellido := 'amargo';
Empleado.Sueldo := XXXXXX;
Empleado.Ingreso := aa//mm/dd;
ListBox.Items.Add('amargo mate', Empleado);
Y accederías al objeto así
Empleado := TEmpleado(ListBox.Items.Objects[i]);
Si llegas a considerar esta posibilidad entonces ten en cuenta que los objetos que insertes en el ListBox tienes que desruirlos en algún momento.
// Saludos