Ver Mensaje Individual
  #1  
Antiguo 25-10-2007
mierda mierda is offline
Miembro
 
Registrado: may 2006
Posts: 129
Reputación: 18
mierda Va por buen camino
Recorrer todos los objetos creados de una clase propia

Hola tios, teniendo la siguiente clase:

Código Delphi [-]
 
type
  tprueba = class
  nombre: string;
  total: integer;
  private
  public
  end;

¿como puedo recorrer todos los objetos creados de esta clase?

actualmente los metia en un listbox y los intento leer asi:

Código Delphi [-]
 
for i := 0 to ListBox1.items.count -1 do
  begin
    if (tprueba(ListBox1.items[i]).nombre) = 'josechu1' then
  end

pero me da un error de memoria


Un saludo y gracias por adelantado.
Responder Con Cita