Hallo,
Ik heb een lisp die ik graag aangepast wil hebben.
Deze lisp trekt oppervlaktes uit aan de hand van omtreklijnen. Je moet dus binnen het vlak klikken en vervolgens geeft hij het oppervlakte weer.
Nu wil ik graag dat deze lisp de text niet neerzat als text maar als mtext. Ik heb al geprobeerd om dit te veranderen maar helaas geeft hij dan niet meer de area.
alvast bedankt voor de hulp
hieronder de lisp
;;;--- GA.lsp - GetArea
JefferyPSanders.com
;;; All rights reserved.
edit Bart
deze lisp is eigendom van jefferySanders.com
heb je toestemming om hem hier te plaatsen
Het is duidelijk dat Jeffery P. Sanders het commando BOUNDARY niet kent. Maar dat geheel terzijde.
Getest op BC7:
Citaat van: roy_043 op di 29 09 2009, 16:58:41
Het is duidelijk dat Jeffery P. Sanders het commando BOUNDARY niet kent. Maar dat geheel terzijde.
Getest op BC7:
zover was ik dus ook alleen geeft hij nu niet gelijk de oppervlakte weer van de vlakken, je kan nu dus alleen tekst erbij typen daar heb ik dan dus niks aan.
boundary werkt niet altijd. We hebben van een architect een tekening gekregen die bestonden uit splines, die splines waren alleen niet gegenereerd uit polylines dus konden we hier geen hoeveelheden van bepalen.
Een vraag voor de zekerheid:
Je hebt dus dit:
(command "_.-mtext"
en niet:
(command "_.mtext"
en toch wordt de mtext dialoog geopend?
Citeerboundary werkt niet altijd
Inderdaad BOUNDARY werkt niet met splines. Alweer wat geleerd!
Citaat van: roy_043 op wo 30 09 2009, 11:22:27
Een vraag voor de zekerheid:
Je hebt dus dit:
(command "_.-mtext"
en niet:
(command "_.mtext"
en toch wordt de mtext dialoog geopend?
geen idee,
het enigste wat ik graag zou willen is dat hij de oppervlakte (welke hij nu dus automatisch uitrekent) neerzet in Mtext in plaats van text
Citaat van: silverster op do 01 10 2009, 11:41:11geen idee
Vreemd antwoord op mijn concrete vraag: staat er wel of geen minteken voor "mtext"?
Door de edit van bart is e.e.a. niet meer goed te volgen. Voor de geïnteresseerden: het originele bestand vind je hier: http://www.jefferypsanders.com/autolisp_GetArea.html
Citaat van: roy_043 op do 01 10 2009, 13:17:47
Vreemd antwoord op mijn concrete vraag: staat er wel of geen minteken voor "mtext"?
sorry,
nu begrijp ik wat je bedoelt:
Command: _mtext Current text style: "Standard" Text height: 2.5
In de lisp moet je dit doen
...
(command "_.-mtext" ...
en niet
...
(command "_.mtext" ...
Hierdoor wordt namelijk de dialoog geopend en dat wil je bij een lisp niet.
Een voorbeeld van een lisp waarmee een aantal regels in een mtext worden geplaatst:
(defun c:testMT ( / pt1 totalStr)
(setq
pt1 (getpoint "\nGeef een punt: ")
totalStr
(strcat
"Inhoud regel 1"
"\\\P"
"Inhoud regel 2"
"\\\P"
"Inhoud regel 3"
)
)
(command "_.-mtext" pt1 "_justification" "_br" "_height" 2.5 "_rotation" 0.0 "_width" 0.0 totalStr "")
(princ)
)
Nogmaals voor de duidelijkheid: het minteken is cruciaal!
oke thanks ik ga er even mee stoeien