Fórum - Autolisp

Nao sei exatamente como vc quer fazer isto, porem da forma que escreveu poderia usar o proprio comando
WBLOCK
selecione todas as entidades desejadas
selecionar o ponto base
e o nome e pasta a ser gravado

t+

testa esta que estou usando nas minhas rotinas. [lsp] (defun groups(/ grp_dict lis_ent_nam) (setq grp_dict (dictsearch (namedobjdict) "ACAD_GROUP") n 0 ) (repeat (length grp_dict) (setq item (nth n grp_dict)) (if (= (car item) 3 ) (setq lis_ent_nam (cons (list (cdr item) (cdr (nth (1+ n) grp_dict)) ...

Obrigado Ederson e Marcelo.....

funcionou perfeitamente dentro da rotina....

So vou fazer uma adaptação para me retornar todos os grupos do desenho em uma lista.

Mas ficou muito boa.......

Obrigado a todos......

.
Procure na Net por :

DWGgateway

Ele abre qualquer versão do AutoCAD no seu prorpio AutoCAD atual.....



http://globalsite.solidworks.com/brazil ... plate.html

Bom, vamos voltar ao tópico pois...... No momento de uma discussão apenas olhamos com um ponto de vista, porem quando vamos realmente usar os métodos....... daí o ponto de visão muda mesmo.... Estou desenvolvendo umas rotinas e preciso de saber o nome do GRUPO, selecionando por "entsel". Bom a rotin...

Bom.... Há muito tempo que estou para postar esta ferramenta simples e eficiente. Um programa que grava e insire os blocos em desenhos com muita facilidade, pois inserir um bloco com o comando “INSERT” as vezes temos de procurar HD, pasta onde foi gravada, sub-pasta e por ai vai... Sabemos que o DES...

Caro ederson

Parece que eu entendi, porem acho que não........ hehehehe
de um exemplo

tipo:
vc digita um numero 1 ele inverte a janela ativa para o arquivo desenho 1 na tela atual?????



t+

Verifique [lsp] (defun c:txts (/ sel lay alt n selec ) (setq sel (entsel "\nSelecione um dos textos das coordenadas")) (setq lay (cdr (assoc 8 (entget (car sel)))));;;; layer do texto selecionado (setq alt (cdr (assoc 40 (entget (car sel)))));;;; altura do texto selecionado (setq n 0 selec (ssget "x...

Boa noite É bem simples porem devemos observar varios fatores... Como estão os textos no seu desenho... Se os textos das coordenadas tiverem em um LAYER separado fica bem facil, mas caso tiverrem outros textos sem ser coordenadas no mesmo layer, teremos de modificar a rotina, ou vc deverá apurar mel...

Ederson

viu a ultima rotina que te enviei no gmail

ta como queres

ok_cancel_help,....... Usando( Enter)