I have forms in my application that I derive from a common ancestor, like: TAtFormBaseIW = class( TIWAppForm )