Como Criar DimStyle com Visual Lisp

3 de dezembro de 2006 / Deixe um comentário / dicas

presta bem atenção, pois é meio complicado: (setq;pega o activedocument: thisdrawing (vla-get-activedocument (vlax-get-acad-object));pega a collection de dimensions deste documento: dimstyles (vla-get-dimstyles thisdrawing);verifica a existencia da dimstyle e pega/ou cria ela: dimsty (if (not (tblsearch “dimstyle” “sua_dimension”)) (vla-add dimstyles “sua_dimension”) (vla-item dimstyles “sua_dimension”)));|Para configurar a sua dimension style via visual lisp,você deve configurar todas as variaveis

Sem categoria

2 de dezembro de 2006 / Deixe um comentário / Sem categoria

Uma rotina diferente hoje… ela desenha um par de linhas, mais ou menos no estilo das MLINE, com uma diferença: é possível alterar o ponto base da linha enquanto se desenha uma linha, algo como, começa pelo ponto a esquerda da linha e termina pelo lado direito, melhor vocês rodarem ela pra ver o que

dicas, Programas, subrotinas

OCS e WCS

1 de dezembro de 2006 / Deixe um comentário / dicas, Programas, subrotinas

Ontem, estava “soldando” umas linhas com a minha rotina MJ4 quando derepente ela me falha!! putz, fiquei cabreiro, afinal havia testando ela de todas as formas que eu pude imaginar!!! Curioso, foi tentar descobrir o que estava acontecendo… mais… Pra minha surpresa, tudo parecia estar em ordem, mas simplesmente não funcionava, não emendava as polilinhas..