Fórum - Autolisp

Que tal importar pontos de elevação do Google Earth no autoCAD? https://tbn2net.com/IMPORTGMPTS E os mapas do google Maps, direto para o autocad, já referenciado? https://tbn2net.com/IMPORTGMMAP Ou ainda, ler arquivos KML do google earth e desenhar eles no autocad? https://tbn2net.com/READKML2 E ain...

... tire o "/*' e o "*/" eles são delimitadores de comentarios
coloquei eles para nao ter que escrever toda a definição do editbox

faça:

[dcl]:row {
:edit_box {/*....*/ }
:edit_box {/*....*/ }
}[/dcl]

o vlx é um conteiner de FAS, TXT, DCL, etc ou seja, o codigo FAS é copiado sem alteração para dentro do VLX como se fosse assim, imagine que o FAS tenha este texto: FAS-FILE o vlx será: VLX_ALGUMA_COISA FAS-FILE OUTRAS_COISAS saca? quanto aos comentarios no codigo, nao se incomode com eles, a compil...

a partir da seleção de polilinhas (selection set)

gere uma lista assim:
[lsp](Setq lista '
(
( area1 ename1 )
( area2 ename2 )
( area3 ename3 )
( area4 ename4 )
( areaN enameN )
)
)[/lsp]

ai usa o vl-sort para ordenar.......
[lsp]( vl-sort lista ' ( lambda(e1 e2) (< (car e1) (car e2)))[/lsp]

sim, as permissoes de gravação e leitura do windows...

quanto a demorar... nao sei... pode ser problema de atrazo na rede...
aqui deu uns erros na nossa rede e o cad dizia que nao podia gravar o arquivo devido a gravação atrazada...
sei la...

o vl-file-delete deve estar sofrendo com as permissoes do windwos

vejas os valores de retorno desta função

mais um tutorial sobre o civil 3d, veja:

http://tbn2.blogspot.com/2009/06/civil- ... -sets.html

trata dos Code Sets, um recurso para personalizar a aparencia dos Corridors, Sections de corridor e Assemblies

vejo que voce esta usando a versao que eu adaptei da rotina de bancoi de dados, entao vamos la, [lsp](Setq file "c:/teste.mdb" user "" pass "" conn (odbc_connect File user pass))[/lsp] conn é o ponteiro para a conexao com o bd, que voce usará aqui: [lsp] (Setq sql "SELECT * FROM TABELA" ;a sql a ser...

vc pode usar:

[lsp](Setq area ( vla-get-area ( vlax-enmae->vla-object ent ) ) )[/lsp]

pode usar:

[lsp]( command "area" "o" ent )
(setq area ( getvar "area" ) )[/lsp]

e pode criar algo mais mirabolante para isso, hehehehe

no mais, para ordenar, veja o help para a função vl-sort