CADsite forum

AutoCAD => Autolisp => Topic gestart door: marcelmaas op vr 05 11 2010, 13:24:55

Titel: block op de goede laag zetten bij inserten (opgelost)
Bericht door: marcelmaas op vr 05 11 2010, 13:24:55
Beste Lispers,

Is de bijgevoegde lisp makkkelijk zo aan te passen dat het block wat door de lisp ingevoegd wordt gelijk op de goede laag wordt geinsert, en wel op de laag "HCKP_TEKST_TOTAAL"

Ik hoor het graag.
Titel: Re:block op de goede laag zetten bij inserten
Bericht door: HofCAD op vr 05 11 2010, 15:48:39
Beste Marcel,

Dit stukje programma code maakt eventueel de ontbrekende laag aan,
en zet deze laag 'Current'.


(setq Lay "HCKP_TEKST_TOTAAL" ColLay "2" LtLay "Continuous" LwLay 0.25)
(if (not (tblsearch "LAYER" Lay))
(command "_.LAYER" "_M" Lay "_C" ColLay "" "_L" LtLay "" "_LW" LwLay "" "")
(command "_.LAYER" "_T" Lay "_ON" Lay "_S" Lay ""))


Natuurlijk moet je de Color, Ltype en LWeight aanpassen.

Met vriendelijke groet, HofCAD CSI.
Titel: Re:block op de goede laag zetten bij inserten
Bericht door: marcelmaas op vr 05 11 2010, 21:26:32
Beste Hofcad,

Waar zou dit stukje code dan ergens tussen in moeten komen te staan?


groeten Marcel..

Titel: Re:block op de goede laag zetten bij inserten
Bericht door: HofCAD op za 06 11 2010, 21:08:09
Citaat van: marcelmaas op vr 05 11 2010, 21:26:32
Beste Hofcad,

Waar zou dit stukje code dan ergens tussen in moeten komen te staan?


groeten Marcel..


Beste marcel,

Ik kan je programma niet testen, maar ik denk dat het geen kwaad
kan als je de code aan het begin zet.

Met vriendelijke groet, HofCAD CSI.
Titel: Re:block op de goede laag zetten bij inserten
Bericht door: marcelmaas op zo 07 11 2010, 11:41:37
Okay ga ik morgen gelijk even testen.

Laat morgen wel weten of het werkt.

groeten Marcel..
Titel: Re:block op de goede laag zetten bij inserten
Bericht door: marcelmaas op ma 08 11 2010, 13:06:56
Ik heb jou code bovenin gezet en nu wordt het block op de goede laag geinsert, dus probleem opgelost

Thanks again..!!!