Topic: How to add a layer description using entmake?

[HasanCAD]

How ro add a layer description
DXF code is 1000 Xdata I tried to add as
(defun Layer (Nme)

Code: [Select]

  (entmake (list (cons 0 "LAYER")
                 (cons 100 "AcDbSymbolTableRecord")
                 (cons 100 "AcDbLayerTableRecord")
                 (cons 2 Nme)
  (cons 1000 "123")
                 (cons 70 0))))follows but gives an error

Code: [Select]

Command: (layer nme)
; error: too few arguments

[CAB]

http://www.theswamp.org/index.php?topic=33041.0

[HasanCAD]

http://www.theswamp.org/index.php?topic=33041.0

Thanks CAB

[CAB]

You're quite welcome.

[Harrie]

http://www.theswamp.org/index.php?topic=33041.0

Thanks CAB

Notice: CreateLayer from VovKa  doesn't work in AutoCAD 2011.
The problem is the line:
(list -3 (list "AcAecLayerStandard" (cons 1000 "") (cons 1000 Desc)))

Regards

[efernal]

perhaps you must use

(regapp "AcAecLayerStandard")

before...

e.fernal

[Harrie]

Thanks, with (regapp "AcAecLayerStandard") the program CreateLayer
http://www.theswamp.org/index.php?topic=35302.0 using entmake works.

[HasanCAD]

Thanks, with (regapp "AcAecLayerStandard") the program CreateLayer
http://www.theswamp.org/index.php?topic=35302.0 using entmake works.

You are posting a link to the same thread

[Harrie]

Thanks, with (regapp "AcAecLayerStandard") the program CreateLayer
http://www.theswamp.org/index.php?topic=35302.0 using entmake works.

You are posting a link to the same thread

Yes, because in an answer I had said:
Notice: CreateLayer from VovKa  doesn't work in AutoCAD 2011.
The problem is the line:
(list -3 (list "AcAecLayerStandard" (cons 1000 "") (cons 1000 Desc)))
and E. Fernal answered: Perhaps you must use
(regapp "AcAecLayerStandard") before...
And my conclusion is: it works.

Regards.