В унаследованном не делается.
Делается в TControl.

Опять какие-то странные (как у Nic-а) AV при закрытии возникали...
То они есть, то их нет...