Фигню ты сделал
Рассчитывать на то, что Invalidate для Top-а сделает TControl.Invalidate - НЕЛЬЗЯ.
Потому-что существуют и другие средства инвалидности. И уж сама винда точно этот метод вызывать не будет