No consigo que el terminate de un thread tenga efecto!!

[Ziara]

Hola a todos, no consigo terminar un thread!

tengo creado en un Unit una clase TThread llamado ThreadPackets que se encarga de ir sacando los paquetes que se captura en un ListView.

En el método execute de dicho clase tengo algo estilo..

while (!Terminated)
{
 //sacar paquetes
}

desde un evento de otra clase distinto llamado Capturar llamo a lo anterior mediante:

void Capturar::Funcion1()
{

//se abre el dispositivo
//selecciona el dispositivo a sniffar

miThread = new ThreadPackets(adhandle);

}

y ahora creo otro método (función) dentro de la misma clase Capturar para terminar con el thread

void Capturar::StopThreadPackets()
{
 miThread->Terminate();
}

con esto, cuando en otro Unit donde está mi formulario principal y donde existe un button4 y hago click en él, asociándole lo anterior, teóricamente debería terminar la captura:

void __fastcall TForm1::Button4Click(TObject *Sender)
{
 Capturar *x = new Capturar();
 x->StopThreadPackets();
 delete x;
}

es decir, cuando ejecuto la aplicación y empieza a ir capturando paquetes e ir mostrandolo en pantalla en el ListView y le doy al botón de terminar captura, pasa de mi... y sigue con la captura.

que estoy haciendo mal u obviando? existe otra alternativa?

gracias