|
|
Verificar Existência de Item ou objeto em um desenho, pelo lisp.
Bom dia pessoal!!!
Como eu faço o cad verificar a existência de um item ou objeto no desenho atravéz do lisp????
ex.
quero que o cad me diga se há um bloco com o nome de "rol.carga"
quero que me diga se há um layes com o nome "dimensão"
quero que ele me diga se há um style chamado romans com o tamanho 3.....
Desde já, agradeço.
Valeu!!!
Edmar Cristiano
Projetista Mecânico.
Re: Verificar Existência de Item ou objeto em um desenho, pelo lisp.
Originally Posted by ed_cristian.dwg
Bom dia pessoal!!!
Como eu faço o cad verificar a existência de um item ou objeto no desenho atravéz do lisp????
ex.
quero que o cad me diga se há um bloco com o nome de "rol.carga"
quero que me diga se há um layes com o nome "dimensão"
quero que ele me diga se há um style chamado romans com o tamanho 3.....
Desde já, agradeço
Valeu!!!
Edmar Cristiano
Projetista Mecânico.
Faça um lisp assim:
(defun c:ent()
(setvar "cmdecho" 0)
(princ "\nSelecione a entidade:\n")
(setq NENT (ssget))
(setq NNENT(ssname NENT 0))
(setq ENT(entget NNENT))
(princ)
)
Carregue e depois execute ENT, logo depois faça !ENT para ver as entidades de uma entidade.
Re: Verificar Existência de Item ou objeto em um desenho, pelo lisp.
voce usa a função de pesquisa em tabelas
(tblsearch "NOME DA TABELA" "O QUE VOCE PROCURA")
Bom dia pessoal!!!
Como eu faço o cad verificar a existência de um item ou objeto no desenho atravéz do lisp????
ex.
quero que o cad me diga se há um bloco com o nome de "rol.carga"
quero que me diga se há um layes com o nome "dimensão"
quero que ele me diga se há um style chamado romans com o tamanho 3.....
Desde já, agradeço
Valeu!!!
Edmar Cristiano
Projetista Mecânico.
Re: Verificar Existência de Item ou objeto em um desenho, pelo lisp.
Valeu mesmo pessoal!
eu fiz da seguinte mateira...
para layer
(if (not (tblsearch "layer" "TEXT")) (command "-layer" "make" "TEXT" "color" "2" "" "ltype" "continuous" "" ""))
para bloco
(if(tblobjname "block" "mmA1")"Verdadeiro")
só que ainda não sei fazer um filtro mais apurado com
quero achar um texto com o style "romans" somente os com o tamanho "3".....
se vc's puderem me ajudar mais uma vez
mas de qualquer forma.... muito obrigado por terem me ajudado até aqui
valeu!
Edmar Cristiano
Projetista Mecânico.
Re: Verificar Existência de Item ou objeto em um desenho, pelo lisp.
então
voce precisa entender que buscas por entidade voce faz de um jeito
e buscas por propeidades voce faz de outra
o que eu te passei foi uma busca propropriedades existentes no seu arquivo
para voce fazer uma busca por entidades que tem estas propriedade o mais facil se voce tiver conhecimento do codigo DXF das entidades
ex.: (setq e1 (ssget "X" (list (cons 1 ed))))
Valeu mesmo pessoal!
eu fiz da seguinte mateira...
para layer
(if (not (tblsearch "layer" "TEXT")) (command "-layer" "make" "TEXT" "color" "2" "" "ltype" "continuous" "" ""))
para bloco
(if(tblobjname "block" "mmA1")"Verdadeiro")
só que ainda não sei fazer um filtro mais apurado com
quero achar um texto com o style "romans" somente os com o tamanho "3".....
se vc's puderem me ajudar mais uma vez
mas de qualquer forma.... muito obrigado por terem me ajudado até aqui
valeu!
Edmar Cristiano
Projetista Mecânico.
Re: Verificar Existência de Item ou objeto em um desenho, pelo lisp.
Entendi....
então quando eu estava utilizando este código
(tblobjname "block" "mmA1")
eu deveria ter feito
(setq teste (ssget "x" '((0 . "INSERT") ((2 . "mmA1"))))
Valeu mesmo Hein!!!
Re: Verificar Existência de Item ou objeto em um desenho, pelo lisp.
Para Bloco (setq BLOCO(ssget "x" (list(cons 2 "NOME_BLOCO"))))
Para Hatch (setq HATCH(ssget "x" '((-4 . "<or")(0 . "HATCH")(-4 . "or>"))))
Para Layer (setq LAYER (ssget "x" (list(cons 8 "LAYER"))))
Para Polyline (setq LW (ssget "x" (list(cons 0 "LWPOLYLINE"))))
Para Cor (setq COR (ssget "x" (list(cons 62 COR))))
Para Tipo TXT (setq TXT (ssget "x" (list(cons 7 "standard"))))
Para Espessura (setq ESPESSURA (ssget "x" (list(cons 370 ESPESSURA))))
e porai vai amigo.
Acesse OpenLISP ::: http://openlisp.marangonijunior.com
Re: Verificar Existência de Item ou objeto em um desenho, pelo lisp.
então
um medoto é para selecionar uma entidade existente
ou outro é para ver se o "bloco/propriedade" existe como referencia no arquivo (esteja ele sendo usado ou não)
voce precisa ter esta diferença de maneira bem clara na sua cabeça quando quer desenvolver um programa
Re: Verificar Existência de Item ou objeto em um desenho, pelo lisp.
Mais uma vez... Obrigado!
Posting Permissions
Reply With Quote