vla-GetExtensionDictionary
, when called, automatically creates an extended dictionary if it doesn't find one.(setq window1 (car (entsel)))
(setq newdict (vla-GetExtensionDictionary (vlax-ename->vla-object window1)))
(setq xrlist (list '(0 . "XRECORD") '(100 . "AcDbXrecord") '(280 . 1) '(1040 . -1.0)))
(setq xname (entmakex xrlist))
(SETQ DICTENT (vlax-vla-object->ename newdict))
(dictadd DICTENT "SCHEME_1" xname)
But I still get an error message: bad DXF group: (1040 . -1.0)
1040 code is for floating numbers. Why do I get this error?
And indeed, when using princ you don't get double quotes. You get them only when the entity comes as a value returned by a function.
A Test shows that BricsCAD (V14) accepts gc 1040 in xrecords. This may also apply to other ODA based .dwg editors.