[CDR X5-X8] как устанавливать текст путем указания координат центра текста

[Nezar]

добрый вечер
можно ли как-то устанавливать текст путем указания координат центра текста, а не угла?
Спасибо!

 

[_MBK_]

 

[andrejK]

вам ничего, обведённое красненьким, в интерфейсе не говорит?

аналогичная картинка есть и докере трансформ.


не говорит?

 

[Nezar]

Ссори, забыл уточнить.
текст ставится через vba
Set shе = ActiveLayer.CreateArtisticText(x, y, 20, , , "Arial", 0, , , , cdrCenterAlignment)
так вот эти Х и Y задают координаты угла. а надо чтобы они воспринимались как координаты центра.

поэтому, к сожалению, обведенное красненьким тут не поможет ((

 

[andrejK]

дык вопрос надо внятно ставить.

 

[Nezar]

а программно можно как то указать эту начальную точку?

 

[splxgf]

После размещения текста получить размеры объекта, ну и путем несложных вычислений перепозиционировать.

 

[Nezar]

решил

 

[Nezar]

После размещения текста получить размеры объекта, ну и путем несложных вычислений перепозиционировать.

все оказалось гораздо проще. даже вычислять ничего не надо было. просто по тем же координатам сделать сетпозишн

 

[andrejK]

@Nezar,

ActiveDocument.ReferencePoint = cdrCenter

это вроде аналог "тыканья в красненькое в центр"

 

[Nezar]

это в первую очередь попробовал. с текстом не заработало (