Ú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
- Intel Core i3 / i5 / i7 / i9 10xxx "Comet Lake" és i3 / i5 / i7 / i9 11xxx "Rocket Lake" (LGA1200)
- Nvidia GPU-k jövője - amit tudni vélünk
- Milyen okostelefont vegyek?
- Parfüm topik
- EAFC 25
- Apple MacBook
- Tasker
- Mesterséges intelligencia topik
- Gyúrósok ide!
- Milyen okostelefont vegyek? OFF topik
- További aktív témák...
- Bontatlan - BATTLEFIELD 1 Collectors Edition - Játékszoftver nélkül
- Eladó Steam kulcsok kedvező áron!
- Windows 10 11 Pro Office 19 21 Pro Plus Retail kulcs 1 PC Mac AKCIÓ! Automatikus 0-24
- Cégek számára kedvezmény! Irodai programok: Office, Word, Excel
- Microsoft licencek KIVÉTELES ÁRON AZONNAL - UTALÁSSAL IS AUTOMATIKUS KÉZBESÍTÉS - Windows és Office