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á.

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)