CADsite forum

dankje voor het snelle antwoord. Dit is precies wat ik bedoel.

Hallo,

Is het ook mogelijk om in een commando een afstand opte geven door middel van een som?
bv bij een lijn. lengte is 500+200+100

Dit zou wel heel makkelijk zijn

Mvg

Elloy

Hallo,

Ik heb een vraag over het aan en uitzetten van layers in een viewport. Als ik mijn layers in model aan heb staan en ik ga naar layout. Dan kan ik door het viewport te activeren en met "vp freeze" zorgen dat ik bepaalde layers niet zie in een viewport. Maar nu heb ik layers in mijn model niet aanstaan kan ik nu ook aangeven in mijn viewport dat, ondanks ze in model uitstaan, ze toch geplot worden?

Mvg,

Elloy

Dank jullie wel voor de antwoorden.

Ik heb een lisp gevonden op 1 van de linken. En hij is bijna precies wat ik zoek. Maar weten jullie ook of het mogelijk is dat ik hem in m2 kan zetten en dat ik m2 er achter kan zetten. En zou het ook mogelijk zijn dat als ik boundery kies en ik teken de polyline dat ik die niet meer hoef te selecteren maar dat hij dat automatisch doet? Verder is het echt een prima lisp.

Groeten Dennis

;;;arb
(defun plar(/ pt pt1 pt2)
(setq pt (getpoint"\nStarting Point: "))
(setq pt1 (getpoint pt "\nNext Point: "))
(command "Pline" pt pt1 "")
   (while
       (setq pt2 (getpoint pt1"\nNext Point: "))
      (command "pline" "" pt2 "")
      (command "pedit" pt "j" pt pt2 "" "")
      (setq pt1 pt2)
   )
(command "pedit" pt "c" "")
(princ)
)

(defun ar5 (/ cm fd ar1 ar2 ar3 tab oba lu tpt lin wh)
(vl-load-com)

  (setq cm (getvar "cmdecho"))
  (setvar"cmdecho" 0)
  (setq fd (getvar "fielddisplay"))
  (if (/= fd 0)(setvar"fielddisplay" 0))

    (setq ar1 (entsel "\nSelect Area Boundary: "))
    (setq ar2 (car ar1))
    (setq tab (vlax-ename->vla-object ar2))
    (setq oba (vla-get-objectid tab))

(setq lu (getvar "lunits"))
(setq tpt (getpoint"\nSelect Area Text Point: "))
(cond
((= lu 2) (setq lin (strcat "%<\\AcObjProp Object(%<\\_ObjId " (rtos oba 2 0) ">%).Area \\f \"%lu6%qf1\">%")))
((= lu 4) (setq lin (strcat "%<\\AcObjProp Object(%<\\_ObjId " (rtos oba 2 0) ">%).Area \\f \"%lu2%ct4%qf1 SQ. FT.\">%")))
((= lu 5) (setq lin (strcat "%<\\AcObjProp Object(%<\\_ObjId " (rtos oba 2 0) ">%).Area \\f \"%lu5\">%")))
((= lu 3) (setq lin (strcat "%<\\AcObjProp Object(%<\\_ObjId " (rtos oba 2 0) ">%).Area \\f \"%lu2%ct4%qf1 SQ. FT.\">%")))
((= lu 1) (setq lin (strcat "%<\\AcObjProp Object(%<\\_ObjId " (rtos oba 2 0) ">%).Area \\f \"%lu1\">%")))
)
(command "mtext" tpt "w" "0" lin "")

(princ)
)     

(defun c:arb (/ key)
(initget  1 "Boundary/label-area Label-area")
(setq key (getkword "\nWould you like Boundary/label-area<B> or Label-area<L>: "))
   (cond
     ((= key "Boundary/label-area")(plar)(ar5))
     ((= key "Label-area")(ar5))
   )
(princ)
)

Hallo,

Is het ook mogelijk dat ik een polyline teken waar automatisch de oppervlakte in komt te staan met tekst? Als ik de polyline groter maak dat hij ook automatisch de tekst aanpast.

Alvast bedankt

Mvg
Elloy

Ja dat klopt. Maar dan moet ik het 2 keer tekenen dus heb ik niet echt tijdwinst door het tekenen met multiline.

Inelk geval bedankt voor het de oplossing

Dennis

Hallo,

Als ik met multiline teken dan kan ik osnap niet gebruiken tijdens het tekenen. Oftewel ik moet alle lengtes in typen en kan bijvoorbeeld niet dmv otrack een hoekpunt van deze lijn overnemen. Weet iemand een mogelijkheid dat het wel werkt?

Groeten Elloy

Hallo Reimer,

Dankje voor de oplossing. Dit is inderdaad wat ik bedoel.

Groeten Elloy

Hallo,

Weer even een vraagje. Is het mogelijk om patroonlijnen te maken? Ik heb even een voorbeeldtekening toegevoegd.

Alvast bedankt

Elloy

bedankt. het probleem is nu opgelost

Hallo Reimer,

Dankje voor het sturen van het blok. Dit is wat ik bedoelde. Is het trouwens ook mogelijk dat als ik het blok kopieer dat de coordinaten automatisch aangepast worden. Of dat ik deze kan updaten.

Groet
Dennis

hallo,

ik heb een vraag. is het mogelijk dat ik een blok maak, Bijvoorbeeld een uitzetpunt, en dat ik bij dit blok de coordinaten van het scherm krijg en dat deze er in tekst bij komen te staan.

Ik hoop dat het duidelijk is. Ik wil graag een uitzet tekening maken op basis van x en y coordinaten. Ik heb nogal veel punten en als ik het er allemaal hanmatig bij moet gaan zetten ben ik nog wel even bezig. Ik weet dat er wel een optie is om dit met maatvoering te doen maar dan nog is het veel werk. Omdat je de x en y apart moet doen.

Alvast bedankt

Dennis

Dankje voor het antwoord. Ik heb de koppelingen van de parameters en visibility voor elkaar gekregen. Wel jammer dat je het niet kan koppelen aan schaal.

Mvg

Dennis

Ten eerste, sorry voor mijn late reactie en te tweede, dank jullie wel voor de reacties. ik hoop dat dit in een volgende autocad zal komen.

mvg

Dennis

hallo,

Ik ben bezig met het maken van een dynamisch blok van een deur. Ik heb mijn deur getekend in block editor. Ik heb de parameters en actions van spiegelen en draaien toegevoegd. Nu wil ik graag dat ik d.m.v. visibility de schaal kan wijzigen (gedetaileerder). Nu heb ik in een nieuwe visibility state aangemaakt met een gedetaileerdere deur. Alleen als ik het block nu in de tekening toepas gaat het fout. Ik plaats het block, zet deze in de juiste richten en zet de draairichting d.m.v. de spiegel opties goed. Als ik nu via visibility mijn schaal verander, dan ben ik de juiste positie kwijt.

Dan nu mijn vraag. Is het mogelijk dat ik mijn block zo maak dat deze instellingen ook behouden worden?

En is het ook mogelijk om het dynamisch blok te koppelen aan de annotation schaal. Als ik de schaal verander dat er een andere visibility state gepakt wordt?

Mvg

Dennis