Result.fHandle := CreateWindowEx(0, TOOLTIPS_CLASS, ', WS_POPUP, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, CW_USEDEFAULT, AParent.Handle, 0, HInstance, nil);[/code]

Дык, между нами девочками говоря, у TMHToolTip и деструктор пустой
Почему-то...

[size=-2]------ Добавлено в 13:45 [/size]
И магическое слово DestroyWindow как-то вообще не модно в этом файле...