FMX和VCL混用時RegisterClass無法GetClass或FindClass的問題

      FMX和VCL混用時，因為FMX.Controls裡有ActivateClassGroup(TFmxObject)，Vcl.Controls裡也有個ActivateClassGroup(TControl)，一旦切換到FMX的ClassGroup，VCL就無法找到類，處理方法是在主視窗建立時或是初始化時，強制切換到TWinControl：

initialization

  StartClassGroup(TWinControl)

  ActivateClassGroup(TWinControl)