Убить процесс на Delphi

[btx]

Есть у меня программа генерирующая 1500 компонентов RxGifAnimators
После выгруза проги и выгруза этих компонентов из памяти... комп в 3000 МГц вешаеться на все 99%... в течении 30-50 секунд
Я пока думаю единственное решение - выгрузить процес из системы...
Но как реализоваь незнаю...
Ил если кто знает другие компаненты для работы с gif в Delphi тоже пойдет

[pva]

Поможет TerminateProcess или ExitProcess (если себя убиваешь), но это может оставить мусор в общей памяти или сконфузить систему.