Здравствуйте.
У меня следующая проблема.
Вывожу на диаграмму текст в определенные координаты Picture Box (x=-0.091; y=0.179). Текст занимает нужное для меня место.
При изменении размеров Picture Box текст остаётся в тех же координатах(x=-0.091; y=0.179) и текст смещается относительно рисунка. Мне же нужно его переместить в новое место, чтобы он занял правильное положение.
Как ни пытаюсь варьировать с параметрами textwidth, textheight, pic.scalewidth, pic.scaleheight - ничего не получается.

Код

Private Sub UserControl_Resize() Dim oldWidth as Single, oldHeight as Single     With pic         oldWidth = .Width         oldHeight = .Height         .Width = UserControl.ScaleWidth - 65 - IIf(m_ShowAxesTitles, Int(lblHidden.Height), 0)         .Height = UserControl.ScaleHeight - 20 - IIf(m_ShowAxesTitles, Int(lblHidden.Height), 0)         .top = 5         .left = 45 + IIf(m_ShowAxesTitles, Int(lblHidden.Height), 0)         picX.Visible = True         For i = 0 To m_TextCount             lblText(i).Move m_tX(i) * .Width / oldWidth, m_tY(i) * .Height / oldHeight         Next i     End With End Sub

где m_tX(i) и m_tY(i) - координаты текста

При этом метки текста перемещаются в противоположном направлении
Как быть

Присоединённый файл ( Кол-во скачиваний: 2 )
 pack.zip 18,42 Kb

Цитата(oal @ 11.9.2005, 15:51)

При изменении размеров Picture Box текст остаётся в тех же координатах

Ну дык текст у тебя остался самостоятельным объектом... он и хнать не знает, что там под ним - и уж тем более что это что-то там обресайзилось...

Либо правь картинку, либо пересчитывай при ресайзе координаты точки привязки и смещай текст...