Hirdetés
- Meggyi001: Vegán? Nem vegán?
- No Voice in the Galaxy
- eBay-es kütyük kis pénzért
- Mr Dini: Mindent a StreamSharkról!
- f(x)=exp(x): A laposföld elmebaj: Vissza a jövőbe!
- Samus: Tomb Raider Remastered I-III
- sziku69: Fűzzük össze a szavakat :)
- Elektromos rásegítésű kerékpárok
- sziku69: Szólánc.
- Brogyi: CTEK akkumulátor töltő és másolatai
Ú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
- Samsung Galaxy S25 Ultra - titán keret, acélos teljesítmény
- OLED TV topic
- Parfüm topik
- Vivo X200 Pro - a kétszázát!
- AMD Navi Radeon™ RX 9xxx sorozat
- Meggyi001: Vegán? Nem vegán?
- MWC 2025: A kicsi és a kamerás - megjött a Xiaomi 15 és az Ultra
- Milyen okostelefont vegyek?
- Kingdom Come: Deliverance I-II.
- NVIDIA GeForce RTX 5080 / 5090 (GB203 / 202)
- További aktív témák...
Állásajánlatok
Cég: PCMENTOR SZERVIZ KFT.
Város: Budapest