用 Google 搜索 GetXRecordData，很多现成代码的 (defun dict-get (owner name / d) (cond ((not owner) (dict-get (namedobjdict) name)) ((= (type owner) 'str) (dict-get (dict-get (namedobjdict) owner) name)) ((= (type owner) 'ename) (dict-get (entget owner) name)) (

Source code for event_monitor.cpp，event_monitor.h，main.cpp