Проблема, как при создании фрейма задать ему свои координаты

[vm123]

Доброго времени суток!
Подскажите пожалуйста, как при создании фрейма задать ему коррдинаты + высоту

Например создаем фрейм
Dim myInDesign As InDesign.Application
Dim myDocument As InDesign.Document
Dim TF As TextFrame

myInDesign = CreateObject("InDesign.Application.CS2")
myDocument = myInDesign.ActiveDocument
TF = myDocument.Pages.Item(1).TextFrames.Add()

по умолчанию коррдинаты (X Y) нового фрейма равны 0.0 и 0.0 а мне необходимо задать свои кординаты, как этоможно сделать?

И второй момент, как задать высоту фрейма?
Длину можно задать через TF.TextFramePreferences.TextColumnFixedWidth а вот как задать высоту?

 

[_JVK_]

Ответ: Проблема, как при создании фрейма задать ему свои координаты

Доброго времени суток!
Подскажите пожалуйста, как при создании фрейма задать ему коррдинаты + высоту

Например создаем фрейм
Dim myInDesign As InDesign.Application
Dim myDocument As InDesign.Document
Dim TF As TextFrame

myInDesign = CreateObject("InDesign.Application.CS2")
myDocument = myInDesign.ActiveDocument
TF = myDocument.Pages.Item(1).TextFrames.Add()

по умолчанию коррдинаты (X Y) нового фрейма равны 0.0 и 0.0 а мне необходимо задать свои кординаты, как этоможно сделать?

И второй момент, как задать высоту фрейма?
Длину можно задать через TF.TextFramePreferences.TextColumnFixedWidth а вот как задать высоту?

В VB несилен, но может как-то так?
TF.GeometricBounds = Array(72, 72, 288, 288)

 

[vm123]

Ответ: Проблема, как при создании фрейма задать ему свои координаты

TF.GeometricBounds = Array(72, 72, 288, 288)

Насколько я правильно понял из описания, GeometricBounds просто показывает координаты фрейма, но не позволяет их задать. По крайней мере у меня не получилось. Если выдать
TF.GeometricBounds(0) = 50.0
TF.GeometricBounds(1) = 50.0
TF.GeometricBounds(2) = 150.0
TF.GeometricBounds(3) = 150.0
то ничего не происходит, координаты остаются прежними

 

[vbatushev]

Ответ: Проблема, как при создании фрейма задать ему свои координаты

Блин.
TF.GeometricBounds = Array(72, 72, 288, 288)
совсем не
TF.GeometricBounds(0) = 50.0
TF.GeometricBounds(1) = 50.0
TF.GeometricBounds(2) = 150.0
TF.GeometricBounds(3) = 150.0

 

[vm123]

Ответ: Проблема, как при создании фрейма задать ему свои координаты

Все работает!
Большое спасибо JVK и vbatushev за помощь.
Вопрос исчерпан.

 

[Санчо Панса]

Ответ: Проблема, как при создании фрейма задать ему свои координаты

Блин.
TF.GeometricBounds = Array(72, 72, 288, 288)
совсем не
TF.GeometricBounds(0) = 50.0
TF.GeometricBounds(1) = 50.0
TF.GeometricBounds(2) = 150.0
TF.GeometricBounds(3) = 150.0

А усли точка привязки не известна как узнать ёё