1、设置Iniset的RUNSTATUS=ELANGUAGE,把控件状态切换到易语言状态,如下：

CAD使用易语言绘制自定义实体_易语言

2、调用DrawCustomEntity绘制自定义实体：

 

CAD使用易语言绘制自定义实体_自定义_02

3、编写CEExplode事件，绘制自定义实体

 

CAD使用易语言绘制自定义实体_控件状态_03

4、编写CEgetGripPoints返回实体的夹点

 

CAD使用易语言绘制自定义实体_自定义_04

5、编写CEmoveGripPointsAt 移动实体夹点

CAD使用易语言绘制自定义实体_控件状态_05

6、编译CEtransformBy事件函数，支持实体的移动，复制操作

CAD使用易语言绘制自定义实体_控件状态_06