программа просмотра векторной карты

[Cyr]

Код: Выделить всё

Масштаб = (Me.Size.Width) / 2650
e.Graphics.ScaleTransform(Масштаб, Масштаб)
СдвигX=0
СдвигY=0
e.Graphics.TranslateTransform(СдвигX, СдвигY)


где 2650 - максимальная ширина рисунка.
Подскажите, по каким формулам пересчитывать координаты для СдвигX, СдвигY
Нужно при нажатии кнопки мыши в текущих координатах курсора (e.X, e.Y) получить увеличенную область изображения с масштабом=1.

[Qwertiy]

Подозрения вызывает необходимость подобной работы с растровой картинкой, когда есть векторные данные...

[Cyr]

Qwertiy. Это не растровая картинка.
Это перерисовка векторной карты в Form1_Paint.
При клике мыши в Form1_MouseUp меняем циклически параметр масштаб=1 или масштаб=Me.Size.Width / 2650
и делаем Me.Refresh(). Но нужно вычислить СдвигX, СдвигY при масштаб=1.

[Cyr]

нашёл я сам формулу:

Код: Выделить всё

СдвигX = e.X - e.X / Масштаб
СдвигY = e.Y - e.Y / Масштаб