Vítejte !   Přihlášení | Registrace
Hlavní menu
CATIA fórum.cz
Novinky
Seriál CATIA
Obecně o CAD
Novinky ze světa DS
Makra pro CATIA V5
Diskuse
Vytvořit téma
Koncepty
Seznam oblíbených
Soukromé zprávy
Pravidla
Live CHAT
VIP žádost
Základy Catia
Ke stažení
Doporučujeme
Pracovní příležitosti
Reklama a kampaně
O fóru
Nápověda

Poloha textu ve draw

Kompletní přehled příspěvků v tématu Poloha textu ve draw řazený podle data jejich publikace na fóru.

UživatelPříspěvek
Pavel Krsek

Poslat zprávu | Profil
Datum: 14.10. 2016 | Zobrazeno: 8200x
Konfigurace CATIA:

Text dotazu:
Dobrý den,
Nedaří se mi vytvořit zapolohování textu v drawingu k promítnutému bodu za space. Zkoušel jsem vše možné, ale nic se mi nedaří. Nejschůdnější mi přijde nyní změřit coordináty bodu ve 2D a ty pak použít pro polohu textu. Bohužel poslední řádek hlásí chybu viz. Kód:

oSel.Search("Name='GeneratedPoint',all")

Dim oPoint = oSel.Item(1).Value
Dim objSPAWorkbench As Workbench = CATIA.ActiveDocument.GetWorkbench("SPAWorkbench")
Dim objMeasurable As Measurable = objSPAWorkbench.GetMeasurable(oPoint)

Děkuji za radu.

Ing Jan Cinert

Poslat zprávu | Profil
[#5978] | Publikováno: 14.10. 2016 - 14:10
Dobrý den,

k tomu je dobré použít metodu IndicateOrSelectElement2D objektu výběru. Dostanete buď souřadnice na výkresu, kam kliknete myší nebo souřadnice vybraného objektu. V tomto případě se předpokládá, že vybraným objektem bude Point2D (izolovaný bod).

Souřadnice bodu dostanete i z bodu samotného, ale musí jít o izolovaný, nikoliv projektovaný bod. Pak funguje metoda GetCoordinates(Coord), kde proměnná Coord je pole typu Variant (souřadnice x a y daného bodu v pohledu).

Pro izolovaní, resp. vytvoření izolovaného bodu se dá použít příkaz Duplicate přes CATIA.StartCommand. Body se pak zase dají smazat, aby v pohledu nepřekážely.

Zjistit souřadnice pomocí měření bezpečně funguje v Partu, ve výkresu jsem to takto snad nikdy nezkoušel a ani nedokážu říct, zda to funguje. Metoda GetMeasurable totiž jako vstup předpokládá objekt typu Reference, který se ve výkresu nedá vytvořit. Projektovaná geometrie je totiž typu CatEarlyGeneratedItem a není v API podporovaná.
Pavel Krsek

Poslat zprávu | Profil
[#5979] | Publikováno: 14.10. 2016 - 15:08
Děkuji moc radu.
Ještě mi nedaří vytvořit referenci po 2D bod, abych prošlo GetCoordinates.
CATIA.StartCommand("Duplicate Geometry")

oSel.Clear()
oSel.Search("Type=Point,all")
Dim oPoint2D As Point2D = oSel.Item(1).Reference
oPoint2D.GetCoordinates(oCoord2)

4. řádek háže chybu.
Ing Jan Cinert

Poslat zprávu | Profil
[#5980] | Publikováno: 15.10. 2016 - 12:40
Takhle ne, musíte vzít přímo bod, u výkresů se na reference nehraje.

Dim oCoord2(1)

Dim oPoint2D As Point2D = oSel.Item(1).Value
oPoint2D.GetCoordinates(oCoord2)


Uživatel nepřihlášen

Pro zobrazení obsahu stránky / provedení akce (vytvoření nového téma, napsání odpovědi do diskuse apod.) musíte být přihlášeni.