关于解耦问题，如图：  TTabSheet 里有一个 TFrame , TFrame 里有一个 TButton 叫 BtnClose 现在要求 BtnClose 可以关闭并且释放掉 TTabSheet ,并且要引发 OnClose 事件。 这就涉及到一个问题，BtnClose 在自杀。标准的 TButton 可能还不会出问题，但漂亮的 cxButton 就有问题了。 我用了PostMessage方法，向 FrmMain 窗口发送自定义消息来解决这个“耦合纠缠”的问题。 本例所用到的知识点： 1. 通过类名字串，来创建类。FindClass 函数 2. "可视化继承",FormMain,TWorkFrameOne 都通过基类,在 IDE 中“拖”出来的。 3. 面向对象的经典写法之一。 4. 本例重点：解耦问题。 [本例源码下载](https://www.jianguoyun.com/p/DdTKV4QQxMf4BRiRoUQ)， dephi xe8编写.