Új hozzászólás Aktív témák
-
zenoka
csendes tag
válasz
ABnormal #532 üzenetére
Haat ket modszer ismerek igy hirtelen:
egy ha azonos rajzon vannak a blokkok mint amit szerkeszteni szeretned akkor megnyitod block editorban (2007-2008as cad eseten, ha korabbi verzio akkor referencia szerkesztoben nyitod meg) atszerkeszted elmented s lass csodat az osszes block atalakult...
a masik modszer gondolom ez kell neked (kicsit bonyibb):
na atolvastam megegyszer a kerest...szoval a legegyszerubb ha az alkatresz rajz ugyanazon a dwg-n belul egy masik papirterbe kerul megmutatasra...igy ha modelterbe modositodd az alkatreszedet a papirterbe is latod a modosulast....tehat en ugy csinalnam hogy az alkatresz blokkjanak a masolatat felrehuznam aztan egy uj papirterbe csak a masolatot mutatnam meg.. -
-
lúzer
veterán
válasz
ABnormal #182 üzenetére
ezt egy .lsp fájlba és keresd meg:
Eszköz->alkalmazás betöltése
vagy appload parancs
ja és a VF paranccsal indul, kilépés: escape
(DEFUN C:VF()
(vl-load-com)
(setq ciklusv nil)
(while (= ciklusv nil)
(setq valt1 nil)
(while (= valt1 nil) ;rajzelem kiválasztás
(initget '' Kilép'')
(setq valt1(entsel ''\nVálasszon ki egy vonalat - vagy -[Kilép]:''))
(if (= valt1 nil) (alert ''Nem választott! '') )
) ; kiválasztás megtörtént-while valt1
(if (= valt1 ''Kilép'') (setq ciklusv 1) (progn ;+++++++ciklusvégre ugrás
(setq ELEM_LISTA (entget (car valt1 )) ) ;setq
(SETQ tipus (assoc 0 ELEM_LISTA))
(if (/= (cdr tipus) ''LINE'') (progn (alert ''Ez nem vonal rajzelem! \n Válasszon vonalat !'') ;if01
(setq w nil) ); igen-ág-prognban
(progn
(setq qw 2.5) ;érték ne nil
(SETQ kpont (assoc 10 ELEM_LISTA))
(SETQ vpont (assoc 11 ELEM_LISTA))
(setq ujvpont (cons 11(cdr kpont)))
(setq ujkpont (cons 10(cdr vpont)))
(setq ELEM_LISTA (subst ujkpont kpont ELEM_LISTA))
(setq ELEM_LISTA (subst ujvpont vpont ELEM_LISTA))
(entmod ELEM_LISTA) ); hamis-ág-prognban
); if01
))
);ciklusvég
);defun
[Szerkesztve]
Új hozzászólás Aktív témák
- Játékkulcsok olcsón: Steam, Uplay, GoG, Origin, Xbox, PS stb.
- Eladó Steam kulcsok kedvező áron!
- Eredeti Microsoft termékek - MEGA Akciók! Windows, Office Pro Plus, Project Pro, Visio Pro stb.
- Adobe Előfizetések - Adobe Creative Cloud All Apps - 12 Hónap
- Assassin's Creed Shadows Collector's Edition PC
- ÁRGARANCIA!Épített KomPhone i5 13400F 16/32/64GB RAM RTX 4060 Ti 8GB GAMER PC termékbeszámítással
- Azonnali készpénzes nVidia RTX 3000 sorozat videokártya felvásárlás személyesen / csomagküldéssel
- ÁRGARANCIA!Épített KomPhone Ryzen 7 5800X 32/64GB RAM RTX 4060 Ti 8GB GAMER PC termékbeszámítással
- BESZÁMÍTÁS! ASUS TURBO RTX 3090 24GB GDDR6X videokártya garanciával hibátlan működéssel
- iKing.Hu - Apple 16 Pro Max - Natural Titanium - Új, kipróbált
Állásajánlatok
Cég: PC Trade Systems Kft.
Város: Szeged
Cég: PC Trade Systems Kft.
Város: Szeged