TuttoCAD Forum

TuttoCAD Forum
[ Home | Registrati | Discussioni Attive | Discussioni Recenti | Segnalibro | Msg privati | Sondaggi Attivi | Utenti | Album Fotografico | Download | | Cerca | FAQ ]
Nome Utente:
 Password:
Salva Password
Password Dimenticata?

 Tutti i Forum
 1 - TuttoCAD Software
 AutoLISP
 Creare un retino con entmake		  Nuova Discussione  Rispondi
 Versione Stampabile Bookmark this Topic Aggiungi Segnalibro
I seguenti utenti stanno leggendo questo Forum Qui c'č:
Autore Discussione Precedente Discussione Discussione Successiva  

Marsetti Alex
Utente


Regione: Veneto
Prov.: Vicenza
Cittā: Malo


17 Messaggi
Inserito il - 10 giugno 2014 : 23:48:14  Mostra Profilo Invia a Marsetti Alex un Messaggio Privato  Rispondi Quotando
Buonasera,
Scrivevo sul forum per chiedervi spiegazioni in merito all'uso di entmake per generale un retino (hatch).
Vorrei sapere quali sono le chiavi della lista necessarie per generale un retino e se č possibile aggiungere alla lista di entitā una lista contenente una successione di punti i contorno del retino.
Grazie.

Giuseppe Mauro
Amministratore



Regione: Campania
Prov.: Napoli


2705 Messaggi
Inserito il - 11 giugno 2014 : 13:17:48  Mostra Profilo Invia a Giuseppe Mauro un Messaggio Privato  Rispondi Quotando
La via generale piu facile per capire come č costituita una entitā autocad, č quella di ottenerla direttamente da autocad.
Mediante (entget (car (entsel))) ottieni la lista completa dell'entita che selezioni, in modo da poterne esaminare la struttura
Torna all'inizio della Pagina

GP
Utente Master


Regione: Piemonte
Prov.: Vercelli


2776 Messaggi
Inserito il - 11 giugno 2014 : 18:26:51  Mostra Profilo Invia a GP un Messaggio Privato  Rispondi Quotando
Vedi l'ultimo post di questa discussione http://www.theswamp.org/index.php?topic=4814.msg436882#msg436882
Torna all'inizio della Pagina

Marsetti Alex
Utente


Regione: Veneto
Prov.: Vicenza
Cittā: Malo


17 Messaggi
Inserito il - 12 giugno 2014 : 11:34:25  Mostra Profilo Invia a Marsetti Alex un Messaggio Privato  Rispondi Quotando
In pratica con questa sintassi ho ricreato tutte le chiavi di un entitā hatch, aggiungendo la mia personale lista di punti, ma ancora non funziona.
Il mio dubbio sorge sull'ultimo codice (10 . punto), che dovrebbe essere il punto d'inserimento del tratteggio.
Tuttavia anche specificando un punto che č interno alla mia lista punti, inteso come dentro alla polilinea, non funziona.
Vi ringrazio per le risposte.


(setq tratt (list '(0 . "HATCH") '(100 . "AcDbEntity") '(410 . "Model") '(100 . "AcDbHatch") '(10 0.0 0.0 0.0) '(210 0.0 0.0 1.0) '(2 . "SOLID") '(70 . 1) '(71 . 0) '(91 . 1) '(92 . 7) '(72 . 0) '(73 . 1) '(93 . 4)))

(setq k 0)
(repeat (length lista_punti)
(setq punto (nth k lista_punti))
(setq tratt (append tratt (list (cons 10 punto))))
(setq k (+ k 1))
)

(setq tratt (append tratt (list '(76 . 1) '(47 . 2.1345) '(98 . 1) '(10 1903.74 1486.99 0.0) '(450 . 0) '(451 . 0) '(460 . 0.0) '(461 . 0.0) '(452 . 0) '(462 . 1.0) '(453 . 2) '(463 . 0.0) '(63 . 5) '(421 . 255) '(463 . 1.0) '(63 . 2) '(421 . 16776960) '(470 . "LINEAR"))))

(entmake tratt)
Torna all'inizio della Pagina
  Discussione Precedente Discussione Discussione Successiva  
 Nuova Discussione  Rispondi
 Versione Stampabile Bookmark this Topic Aggiungi Segnalibro
Vai a:
TuttoCAD Forum © 2001-2010 CADLandia Torna all'inizio della Pagina
Pagina generata in 0,3 secondi.