Ver Mensaje Individual
  #10  
Antiguo 14-06-2007
Avatar de Lepe
[Lepe] Lepe is offline
Miembro Premium
 
Registrado: may 2003
Posts: 7.424
Reputación: 29
Lepe Va por buen camino
Usa un TObjectList, es lo más cómodo.
Declara en la ventana el TObjectList;
Código Delphi [-]
uses contnrs;

Form1 = class(TForm);
....

private
   Lista: TObjectList;


Cuando necesites destruir todos los Thumb:
Código Delphi [-]
  FreeAndNil(Lista); // no importa que lo llames varias veces
// no obtendrás Violaciones de acceso a memoria ni nada.

Cuando necesites crear un Thumb:
Código Delphi [-]
if not Assigned(Lista) then
  Lista := TObjectList.Create(True);
Lista.Add(Thumb) ; // este es el Thumbnail que acabas de crear
// lo añadimos a la lista.

Mira la ayuda de TObjectlist o busca por el foro.

Saludos
__________________
Si usted entendió mi comentario, contácteme y gustosamente,
se lo volveré a explicar hasta que no lo entienda, Gracias.
Responder Con Cita