Координаты центра видимой части ScrollBox

[Алён@]

Как их посчитать?
Есть ли такое свойство у этого бокса, как ширина видимой области по горизонтали и по вертикали?

[r9m]

собственно height & width. Берём эти значения, делим на 2 - это и будут координаты центра

[Алён@]

Нет, это не то. Это параметры всего бокса, а мне нужна только текущая видимая область.

[Kotofff]

тогда проверяй на видимость полосы прокрутки и если они обе или по одной видны - вычитай из ширины и(или) высоты самого контрола их ширину (вертикальной) или высоту (горизонтальной) :

GetSystemMetrics(SM_CXVSCROLL) или
GetSystemMetrics(SM_CYHSCROLL)

[r9m]

Чёт я всё равно не пойму, что же ты тогда подрузамеваешь под видимой областью?

[Алён@]

Это та часть рисунка, которую в данный момент видит пользователь. Если рисунок больше предназначенной для отображения рисунка области появляются полосы прокрутки.

[Stilet]

ScrollBox1.VertScrollBar.ScrollPos
ScrollBox1.HorzScrollBar.ScrollPos

пробуй

[Алён@]

Уже пробовала - это хороший вариант. Но нужно к этому что-то прибавить, чтобы попасть в середину. Вот что? Я пока думаю.

[Алён@]

Ура! Придумала. Вот то, что надо

PointCenter.X:=form1.ScrollBox1.Hor zScrollBar.Position+round(form1.Scr ollBox1.Width/2)

Всем спасибо!

[Алён@]

Сообщение от Kotofff

тогда проверяй на видимость полосы прокрутки и если они обе или по одной видны - вычитай из ширины и(или) высоты самого контрола их ширину (вертикальной) или высоту (горизонтальной) :

GetSystemMetrics(SM_CXVSCROLL) или
GetSystemMetrics(SM_CYHSCROLL)

Это не прошло.