Re: Polyline z VBA
Vytištěno z: CAD Fórum
Kategorie: Autodesk - stavebnictví, strojírenství, CAD/GIS
Název fóra: AutoCAD
Popis fóra: Otázky kolem aplikací AutoCAD a AutoCAD LT, AutoCAD 360, prohlížečů, DWG a DWF, Design Review, Navisworks, nadstavby, 123D, A360 a cloud Autodesk 360
URL: https://www.cadforum.cz/forum/forum_posts.asp?TID=3890
Datum vytištění: 26.dub.2026 v 07:55
Téma: Re: Polyline z VBA
Odeslal: orlik
Předmět: Re: Polyline z VBA
Datum odeslání: 01.úno.2007 v 06:38
Takže nikdo nevite, jak dostat ve VBA z polyline data o jednotlivych elementech?
viz.:
Téma: Explode polyline a co s rozbitymi elementy
Diky
|
Odpovědi:
Odeslal: Vladimír Michl
Datum odeslání: 01.úno.2007 v 07:36
Explode je metoda, která objekt rozloží. Pro pouhé zjišťování dat použijte vlastnosti daného objektu.
-------------
Vladimír Michl (moderátor)
ARKANCE CZ - https://arkance.world - arkance.world
(podpora viz helpdesk.arkance-systems.cz)
|
Odeslal: orlik
Datum odeslání: 01.úno.2007 v 08:09
Dik, ale ja neprebuju zjistit, zdali je polyline uzavrena, ci ne, kolik ma vrcholu a jakou barvu(to vim). Potrebuji zjistit, z jakych elementu se sklada.
ps. Pokud jsem neco prehledl, jak zjistit z objektu napr. polyObj.vlastnosti
kdyz vlastnosti nejsou v moznostech VBA
dik
|
Odeslal: Vladimír Michl
Datum odeslání: 01.úno.2007 v 08:20
V tom případě je potřeba se podívat do vlastností elementů (Coordinates) - viz objektový model v Helpu.
-------------
Vladimír Michl (moderátor)
ARKANCE CZ - https://arkance.world - arkance.world
(podpora viz helpdesk.arkance-systems.cz)
|
Odeslal: orlik
Datum odeslání: 01.úno.2007 v 09:17
V casti kodu je vypis souradnic ...
Case "AcDbPolyline"
For i = 0 To 15
xy = vracenyObj.Coordinate(i)
Next i
... toto je jedna z vlastnosti, ktere mohu zjistit, bez toho, abych pouzil explode(vypise souradnice X,Y). Nevim, jak bych dostal poc. a konc. uhel, stred, polomer u oblouku, uhel a deltu u primky, vcetne poc. a kon bodu kazdeho elementu. Asi se to da vse vypocitat(jiste), ale proc delat neco, co asi? uz v autocadu je udelane, a presneji.
Nechci tady vypisovat vsechny vlastnosti polyline - AddsVertex, Application, Area, Closed, Length ...Coordinate ...
ale Delta, BeginAngle, Center, EndAngle,... tam mezi nema neni.
Napada nekoho neco?
|
Odeslal: Vladimír Michl
Datum odeslání: 01.úno.2007 v 10:37
|
Parametr oblouků jde zjistit metodou GetBulge. Metodami objektu zjistíte vše co je ve výkresu uloženo. Ostatní parametry se musejí spočítat - musí to dělat jak AutoCAD tak i případná jiná (vaše) aplikace, kterou k danému objektu přistupujete.
-------------
Vladimír Michl (moderátor)
ARKANCE CZ - https://arkance.world - arkance.world
(podpora viz helpdesk.arkance-systems.cz)
|
|