Vytisknout stránku | Zavřít okno

srafovanie cez VBA

Vytištěno z: CAD Fórum
Kategorie: Autodesk - stavebnictví, strojírenství, CAD/GIS
Název fóra: CAD programování
Popis fóra: Otázky programování - nadstavby a utility pro CAD a GIS aplikace Autodesk (VBA, AutoLISP, ARX/C++, .Net, JavaScript, Python, MEL...)
URL: https://www.cadforum.cz/forum/forum_posts.asp?TID=8423
Datum vytištění: 13.kvě.2026 v 16:51


Téma: srafovanie cez VBA
Odeslal: janusza
Předmět: srafovanie cez VBA
Datum odeslání: 03.dub.2009 v 02:59
Prosim o radu. Potrebujem vysrafovat urcitu cast objektu(zatial ju nemam ako blok), prostrednictvom VBA.
Je to nejako mozne v principe ako sa to robi klasickym sposobom v autocade? (vyber bodov, alebo ploch)

VELMI PEKNE DAKUJEM za akukolvek radu...


-------------
Jana


Odpovědi:
Odeslal: Vladimír Michl
Datum odeslání: 03.dub.2009 v 07:11
Pokud máte např. v "objPline" uloženu obrysovou křivku, vyšrafujete ji pomocí: 


Set objHatch = ThisDrawing.ModelSpace.AddHatch(acHatchPatternTypePreDefined, "SOLID", True)
Set Border(0) = objPline
objHatch.AppendOuterLoop Border
objHatch.Evaluate


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


Vytisknout stránku | Zavřít okno