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:
Cuando necesites crear un Thumb:
Código Delphi
[-]
if not Assigned(Lista) then
Lista := TObjectList.Create(True);
Lista.Add(Thumb) ;
Mira la ayuda de TObjectlist o busca por el foro.
Saludos