AutoCAD Map 3D Forum
Welcome to Autodesk’s AutoCAD Map 3D Forums. Share your knowledge, ask questions, and explore popular AutoCAD Map 3D topics.
cancel
Showing results for 
Show  only  | Search instead for 
Did you mean: 

How I can delete a topology with LISP

3 REPLIES 3
Reply
Message 1 of 4
Anonymous
631 Views, 3 Replies

How I can delete a topology with LISP

Can someone tell me about this
3 REPLIES 3
Message 2 of 4
Anonymous
in reply to: Anonymous

Hi,

(setq topo_name "my_topology_name"))
(setq itr_id (tpm_iterstart))
(while (tpm_iternext itr_id)
(if (= topo_name (tpm_itername itr_id))
(tpm_mnterase (tpm_itername itr_id))
) ;_ end of if
) ;_ end of while


Regards,

Pierre

"Raúl" a écrit dans le message news:
f085982.-1@WebX.maYIadrTaRb...
> Can someone tell me about this
>
>
Message 3 of 4
Anonymous
in reply to: Anonymous

Great!

Pierre,

Do you know where can we find the complete list of all (tpm_*) functions.

Thanks and regards
Rad

"Pierre Cardinal" wrote in message
news:1B69BC4E7E971538B7266A068F877AE1@in.WebX.maYIadrTaRb...
> Hi,
>
> (setq topo_name "my_topology_name"))
> (setq itr_id (tpm_iterstart))
> (while (tpm_iternext itr_id)
> (if (= topo_name (tpm_itername itr_id))
> (tpm_mnterase (tpm_itername itr_id))
> ) ;_ end of if
> ) ;_ end of while
>
>
> Regards,
>
> Pierre
>
> "Raúl" a écrit dans le message news:
> f085982.-1@WebX.maYIadrTaRb...
> > Can someone tell me about this
> >
> >
>
>
Message 4 of 4
Anonymous
in reply to: Anonymous

"Rad Lazic" escribió en el mensaje
news:B99AAEB9A4ECFA59C0F4946BE56D6CFE@in.WebX.maYIadrTaRb...
> Do you know where can we find the complete list of all (tpm_*) functions.

Just enter the Visual LISP IDE, click on the APROPOS icon (something like:
[(A)]), in the APROPOS options dialog box enter tpm_ and click Accept...
The APROPOS results dialog box shows all available functions with this
prefix.
You can copy the resulting list to the Trace log window.
If you want help on these functions search your autocad helpfiles for
AcMapAds.chm

Following is the list copied from my system:

Bienvenido a Visual LISP for AutoCAD 2000
; kernel LPP: IDE v.T.0* Apr 23 2001
[ACADVER = 15.06s (LMS Tech)]
; kern VLLib: IDE v.T* Mar 03 1999, build #688 [4/23/01]

; "C:/Archivos de programa/Autodesk Map 5 - Esp/VLLIB.DLL" cargado
; escritorio restituido de "C:/Archivos de programa/Autodesk Map 5 -
Esp/VLIDE.DSK"
...............
LOG Resultados de aproximación
...............
TPM_ACCLOSE
TPM_ACEXIST
TPM_ACLOAD
TPM_ACOPEN
TPM_ACQTY
TPM_ACUNLOAD
TPM_ACUPGRADEOPEN
TPM_ANABUFFER
TPM_ANADISSOLVE
TPM_ANAOVERLAY
TPM_CLEANALLOC
TPM_CLEANCANCEL
TPM_CLEANCOMPLETE
TPM_CLEANEND
TPM_CLEANERRORCUR
TPM_CLEANERRORDRAW
TPM_CLEANERRORFIX
TPM_CLEANERRORGET
TPM_CLEANERRORMARK
TPM_CLEANERRORSET
TPM_CLEANFREE
TPM_CLEANGROUPDRAW
TPM_CLEANGROUPFIX
TPM_CLEANGROUPMARK
TPM_CLEANGROUPNEXT
TPM_CLEANGROUPQTY
TPM_CLEANGROUPSUBTYPE
TPM_CLEANGROUPTYPE
TPM_CLEANINIT
TPM_CLEANSTART
TPM_EDITADDELEM
TPM_EDITDELELEM
TPM_EDITMODELEM
TPM_EDITUPDELEM
TPM_ELEMADJ
TPM_ELEMFIND
TPM_ELEMGET
TPM_ELEMID
TPM_ELEMQTY
TPM_ELEMSS
TPM_INFOBUILDVAR
TPM_INFOCOMPLETE
TPM_INFOCORRECT
TPM_INFOCURRENT
TPM_INFODESC
TPM_INFOMODIFIED
TPM_INFONAME
TPM_INFOSTATUS
TPM_INFOTYPE
TPM_INFOVERSION
TPM_ITERDESC
TPM_ITERNAME
TPM_ITERNEXT
TPM_ITERSTART
TPM_ITERSTOP
TPM_ITERTYPE
TPM_ITERVERSION
TPM_MNTBUILD
TPM_MNTERASE
TPM_MNTREBUILD
TPM_MNTRENAME
TPM_QRYGETRESDESC
TPM_QRYGETRESTOPO
TPM_QRYGETTOPONAME
TPM_QRYSETRESTOPO
TPM_QRYSETTOPONAME
TPM_TRACEALLOC
TPM_TRACEELEMEDIT
TPM_TRACEELEMGET
TPM_TRACEELEMID
TPM_TRACEFLOOD
TPM_TRACEFREE
TPM_TRACEQTY
TPM_TRACESETMAXRES
TPM_TRACESETMINRES
TPM_TRACESHORT
TPM_TRACESHORTSCAN
TPM_TRACESHORTVAL
TPM_VARALLOC
TPM_VARFREE
TPM_VARGET
TPM_VARLIST
TPM_VARSET
...............
83 símbolos que contienen "tpm_"
...............

"Rad Lazic" escribió en el mensaje
news:B99AAEB9A4ECFA59C0F4946BE56D6CFE@in.WebX.maYIadrTaRb...
> Great!
>
> Pierre,
>
> Do you know where can we find the complete list of all (tpm_*) functions.
>
> Thanks and regards
> Rad
>
> "Pierre Cardinal" wrote in message
> news:1B69BC4E7E971538B7266A068F877AE1@in.WebX.maYIadrTaRb...
> > Hi,
> >
> > (setq topo_name "my_topology_name"))
> > (setq itr_id (tpm_iterstart))
> > (while (tpm_iternext itr_id)
> > (if (= topo_name (tpm_itername itr_id))
> > (tpm_mnterase (tpm_itername itr_id))
> > ) ;_ end of if
> > ) ;_ end of while
> >
> >
> > Regards,
> >
> > Pierre
> >
> > "Raúl" a écrit dans le message news:
> > f085982.-1@WebX.maYIadrTaRb...
> > > Can someone tell me about this
> > >
> > >
> >
> >
>
>

Can't find what you're looking for? Ask the community or share your knowledge.

Post to forums  

”Boost