<img src="/common/bigicon-diskuze.png" style="vertical-align:middle;height:80px" alt="Diskuze"/> Diskuzní fórum, poradna

Diskutér

Přihlášen: 18.zář.2011
Lokalita: Slovensko
Používám:
Autocad Inventor 11, AutoCad Mechanical 2007
Stav: Offline
Bodů: 25

Téma: Triedenie, migracia vykresov
Zasláno: 22.srp.2012 v 07:43

Zdravím,

chcel by som sa spýtať či existuje riešenie samozrejme okrem manualneho či by sa dali davkovo konvertovať výkresy do samotných suborov pod určitým názvom súboru.

Ide o to, že mám k dispozícií mnoho výkresov(súborov *.dwg), kde vo výkresovom priestore je mnoho výkresov.Naši bývalí kolegovia začínali v AutoCad 97 a všetko kreslili do jedneho suboru. Keď bol počet výkresov neunosny založil sa nový súbor. Chcel by som zistiť či existuje nejaká dávková konverzia, že by každý jeden výkres uložil do súboru pod určitým menom.

Nevýhoda je možno asi aj to, že rámčeky a rohové razítka nie sú urobene z blokov, ale všetko je geometricky nakreslené.

Tak čo myslíte dalo by sa s tým niečo robiť?

Za odpovede vopred ďakujem. Wink

Vladimír Michl Zobrazit panel

http://www.cadforum.cz/cadforum/qaID.asp?tip=5868

Moderátor

ARKANCE

Přihlášen: 09.zář.2004
Lokalita: ČR (JČ)
Používám:
Implementujeme řešení Autodesk
Stav: Offline
Bodů: 21958

Zasláno: 22.srp.2012 v 07:53

Pokud tomu dobře rozumím, pomůže vám utilita Layouts2Dwgs - viz

popř. pro jednotlivé spouštění příkaz EXPORTROZVRŽENÍ - viz

http://www.cadforum.cz/cadforum/qaID.asp?tip=5675

Vladimír Michl (moderátor)
ARKANCE CZ - arkance.world
(podpora viz helpdesk.arkance-systems.cz)

pedroxxl

Diskutér

Přihlášen: 18.zář.2011
Lokalita: Slovensko
Používám:
Autocad Inventor 11, AutoCad Mechanical 2007
Stav: Offline
Bodů: 25

Zasláno: 22.srp.2012 v 10:22

Pozeral som tipy čo ste pridali, ale utilita L2D vytvára z automatických rozvržení nové subory, ale to ja nemám.

Pripájam obrázok, ako napr. vyzerá súbor s výkresmi. Výkresy sú v modelovom priestore. Teraz by som chcel každý jeden uložiť do jedného súboru. Ako by ste postupovali pri tomto? Dá sa to? Samozrejme okrem manuálneho kopírovania do nového súboru po jednom.

Seiner

CAD/BIM manager

Přihlášen: 01.říj.2004
Lokalita: ČR (PA)
Používám:
Mechanical 2017, Inventor 2017 a starší
Stav: Offline
Bodů: 1662

Zasláno: 22.srp.2012 v 10:43

To je opravdu mazec :-) takovýto přístup jsem viděl tak v T602 a u některých zarvrzelých ještě ve wordu.

Neumím si představit, jak zautomatizovat vyhledávání jednotlivých výkresů (snad kdyby byl rámeček vždy nějaký známý blok, tak prohledat lispem databázi a podle vkládacího bodu a měřítka spočítat okno - mně by se to teda dělat nechtělo.)

Asi bych si udělal tlačítko na -PIŠBLOK s vhodnými volbami a posadil k tomu brigádníka.

Vítězslav Seiner

Chrudim

pedroxxl

Diskutér

Přihlášen: 18.zář.2011
Lokalita: Slovensko
Používám:
Autocad Inventor 11, AutoCad Mechanical 2007
Stav: Offline
Bodů: 25

Zasláno: 22.srp.2012 v 11:07

Ja viem je to proste jednoznačný bordel Confused

, ktorý som zdedil a tápam v tom ako to najefektívnejšie poprerábať... Ermm

v niektorých prípadoch sa jedná doslova o výkresy(maľby), ktoré ako keby boli kreslené v skicári, bez blokov, všetky objekty rozložené, tabulky kreslené:(

no katastrofa....

Vladimír Michl Zobrazit panel

http://www.cadforum.cz/cadforum/vykresleni-serie-ramecku-kreseb-poskladanych-v-dwg-vykresu-tip7584

Moderátor

ARKANCE

Přihlášen: 09.zář.2004
Lokalita: ČR (JČ)
Používám:
Implementujeme řešení Autodesk
Stav: Offline
Bodů: 21958

Zasláno: 22.srp.2012 v 12:12

V původním příspěvku píšete, že jsou výkresy ve výkresovém prostoru.

Pokud jsou tedy jako pole naopak v modelovém prostoru, pak pomůže jiná naše utilita, PlotDWGarr - viz:

(umí z pole vytvořit sérii rozvržení a pak už pomůže postup popsaný výše)

Vladimír Michl (moderátor)
ARKANCE CZ - arkance.world
(podpora viz helpdesk.arkance-systems.cz)

pedroxxl

Diskutér

Přihlášen: 18.zář.2011
Lokalita: Slovensko
Používám:
Autocad Inventor 11, AutoCad Mechanical 2007
Stav: Offline
Bodů: 25

Zasláno: 23.srp.2012 v 23:41

Zdravím tak utilita na vytvaranie sérií rozvržení funguje super. Ale mám problém pri vytváraní nových DWG z rozvržení. Použil som utilitu LayoutstoDWGs.lsp a pri vytvaraní mi vyhodí error a zatvorí autocad:(

Seiner

CAD/BIM manager

Přihlášen: 01.říj.2004
Lokalita: ČR (PA)
Používám:
Mechanical 2017, Inventor 2017 a starší
Stav: Offline
Bodů: 1662

Zasláno: 24.srp.2012 v 09:06

Pokud byste měl rámečky opavdu umístěné v poli, pak by jako námět mohlo posloužit třeba tohle:

(setq nula (getpoint "Levý dolní roh prvního rámečku:"))
(setq PHR (getpoint nula "Velikost rámečku (PHR):") )
(setq x (getdist nula "Další rámeček vpravo (LDR):") )
(setq y (getdist nula "Další rámeček nahoru (LDR):") )
(setq sloupcu (Getint "Počet sloupců"))
(setq radku (getint "Počet řádků"))
(setq sloupec 1 radek 1)
(setq x0 (CAR nula) y0 (CADR nula))
(setq x1 (car PHR) y1 (CADR PHR))
(setq dx (- x1 x0) dy (- y1 y0))
(while (<= radek radku)(progn
(while (<= sloupec sloupcu)(progn
(setq xi (+ x0 (* (- sloupec 1) x)))
(setq yi (+ y0 (* (- radek 1) y)))
(setq ldri (list xi yi))
(setq phri (list (+ xi dx) (+ yi dy)))

(setq nazev (strcat (getvar 'dwgprefix) "xx-" (itoa radek) "-" (itoa sloupec)))
(command "_-WBLOCK" nazev "" ldri "_W" ldri phri "")

(setq sloupec (1+ sloupec))
)); end while
(setq radek (1+ radek))
(setq sloupec 1)
));end while

Vítězslav Seiner

Chrudim

Seiner

CAD/BIM manager

Přihlášen: 01.říj.2004
Lokalita: ČR (PA)
Používám:
Mechanical 2017, Inventor 2017 a starší
Stav: Offline
Bodů: 1662

Zasláno: 24.srp.2012 v 09:10

IMHO by to fungovalo i v případě, že by výkresy nebyly rozmístěné přesně a nebyly stejně velké - jen by musely být v nějaké mřížce a té byste se pak chytal.

Upravil Seiner - 24.srp.2012 v 09:48

Vítězslav Seiner

Chrudim

Vladimír Michl Zobrazit panel

Moderátor

ARKANCE

Přihlášen: 09.zář.2004
Lokalita: ČR (JČ)
Používám:
Implementujeme řešení Autodesk
Stav: Offline
Bodů: 21958

Zasláno: 24.srp.2012 v 09:20

pedroxxl napsal(a):

Zdravím tak utilita na vytvaranie sérií rozvržení funguje super. Ale mám problém pri vytváraní nových DWG z rozvržení. Použil som utilitu LayoutstoDWGs.lsp a pri vytvaraní mi vyhodí error a zatvorí autocad:(

To je divné, ta utilita je celkem jednoduchá a nic speciálního nepáchá. Jakou vám hlásí při spuštění verzi (rok)?

Vladimír Michl (moderátor)
ARKANCE CZ - arkance.world
(podpora viz helpdesk.arkance-systems.cz)

pedroxxl

Diskutér

Přihlášen: 18.zář.2011
Lokalita: Slovensko
Používám:
Autocad Inventor 11, AutoCad Mechanical 2007
Stav: Offline
Bodů: 25

Zasláno: 24.srp.2012 v 09:35

1. Ale ak sú napr. výkresy "porozhadzované" (bez postupnosti)v modelovom priestore (viď obr. vyššie) ako sa najjednoduchšie dajú zoradiť do nejakeho poľa(mriežky) nieje na to vyhradená nejaká funkcia v AutoCade? Asi by bol problém s tým, že vykres nieje blok, však. Alebo?

2. Potom z poľa premiestniť vykresy do rozvržení som použil tip http://www.cadforum.cz/cadforum/vykresleni-serie-ramecku-kreseb-poskladanych-v-dwg-vykresu-tip7584 to funguje super!! Za to ďakujem!!

3. Ale ešte potrebujem všetky rozvržení uložiť do samotných DWG. To zabezpečuje utilitka Layoutstodwgs.lsp ale pri nej mi vždy zamrzne AutoCad a vypne sa... :(

Seiner

CAD/BIM manager

Přihlášen: 01.říj.2004
Lokalita: ČR (PA)
Používám:
Mechanical 2017, Inventor 2017 a starší
Stav: Offline
Bodů: 1662

Zasláno: 24.srp.2012 v 09:56

Jestliže potřebujete samostatná DWG, přijde mi převod přes rozvržení trochu krkolomný. Obávám se, že zarovnání do mžížky za vás nic neudělá. Zvlášť pokud nejsou dodržována nějaká rozumná pravidla.

Jestliže musíte s každým výkresem šoupnout, tak už je skoro stejná práce použít makro s pišblokem, jak jsem psal výše.

Vítězslav Seiner

Chrudim

pedroxxl

Diskutér

Přihlášen: 18.zář.2011
Lokalita: Slovensko
Používám:
Autocad Inventor 11, AutoCad Mechanical 2007
Stav: Offline
Bodů: 25

Zasláno: 24.srp.2012 v 09:57

Vladimír Michl napsal(a):

To je divné, ta utilita je celkem jednoduchá a nic speciálního nepáchá. Jakou vám hlásí při spuštění verzi (rok)?

Po použití utility LayoutstoDwgs.lsp mi vyhodí hlášku ERROR HANDLER RE-ENTERED. EXITING NOW. Následne sa Autocad zavrie a chce poslať chybovú hlášku spoločnosti Autodesk.

Mám verziu AutoCad mechanical 2006.

Ale skúšali sme to aj na 2013 a tam to isté.

utilitu mám z http://www.jtbworld.com/lisp/layoutstodwgs.htm

Seiner

CAD/BIM manager

Přihlášen: 01.říj.2004
Lokalita: ČR (PA)
Používám:
Mechanical 2017, Inventor 2017 a starší
Stav: Offline
Bodů: 1662

Zasláno: 24.srp.2012 v 10:11

Když si pustíte následující lispík, tak vyzobete za minutu výkresy. IMHO cesta nejmenšího odporu :-)

(setq i 1)
(setq n1 (getstring "\nZákladní název:"))
(While T
(Setq LDR (getpoint "\nLDR:"))
(setq PHR (getpoint LDR "\nPHR:"))
(setq nazev (strcat (getvar 'dwgprefix) n1 "-" (itoa i)))
(command "_-WBLOCK" nazev "" LDR "_W" ldr phr "")

(setq i (1+ i))
)

Vítězslav Seiner

Chrudim

Vladimír Michl Zobrazit panel

Moderátor

ARKANCE

Přihlášen: 09.zář.2004
Lokalita: ČR (JČ)
Používám:
Implementujeme řešení Autodesk
Stav: Offline
Bodů: 21958

Zasláno: 24.srp.2012 v 10:17

pedroxxl napsal(a):

utilitu mám z http://www.jtbworld.com/lisp/layoutstodwgs.htm

O této utilitě ale nebyla řeč. Je to jen shoda jmen, naše utilita odkazovaná z onoho tipu takovéto problémy nemá.

Vladimír Michl (moderátor)
ARKANCE CZ - arkance.world
(podpora viz helpdesk.arkance-systems.cz)

pedroxxl

Diskutér

Přihlášen: 18.zář.2011
Lokalita: Slovensko
Používám:
Autocad Inventor 11, AutoCad Mechanical 2007
Stav: Offline
Bodů: 25

Zasláno: 24.srp.2012 v 10:59

Seiner ďakujem za lipsik, ale skusim ho spojiť ešte s jedným lipsikom aby som nemusel zobať tie vykresy ručne, ale až to vyberá z poľa výkresov. Dúfam, že to pobeží. Som úplný začiatočník v tom tak za nejaký čas dám vedieť či to vyšlo alebo či potrebujem pomoc :)

Seiner

CAD/BIM manager

Přihlášen: 01.říj.2004
Lokalita: ČR (PA)
Používám:
Mechanical 2017, Inventor 2017 a starší
Stav: Offline
Bodů: 1662

Zasláno: 24.srp.2012 v 11:47

No vždyť to je to, co jsem vám poslal předtím. Jenže podmínka funkce je, že výkresy jsou v nějakém pravoúhlém rastru. A než rovnat výkresy do rastru, přijde mi jednosušší je vyzobat. (Jeden výkres=2 kliknutí). Je to ve smyčce, takže opravdu jen klikáte. -WBLOCK entity smaže, takže vidíte, co jste už vyexportoval - jen nakonec nesmíte uložit :-)

Vítězslav Seiner

Chrudim

pedroxxl