Сдвиг и масштабирование графика функции

@Gamst · Регистрация: 21.04.2010

Author24 — интернет-сервис помощи студентам

Привет!) Написал программу, которая рисует график функции.
Как сделать масштабирование( допустим увеличение на 10% или уменьшение) и сдвиг (например на 15 пикселей) по нажатию какой либо клавиши?
Если надо будет, то покажу код программы.

@Arcor · 03.02.2012, 00:10

ну как на математике сдвигают графики? и тут так же

deathNC · 03.02.2012, 06:39

Delphi

1
2
3

var
  ScrollX, ScrollY, // смещение
  ScaleX, ScaleY: Real; // масштаб

Delphi

1 2	MoveTo(Round(scrollX + (ScaleX * X1)), Round(scrollY + (ScaleY * Y1))); LineTo(Round(scrollX + (ScaleX * X2)), Round(scrollY + (ScaleY * Y2)));

Все места, где вызывается MoveTo или LineTo замени на примерно на то, что выше написано, где X1, X2, Y1, Y2 - это те выражения, которые сейчас написаны в твоей программе.
То есть мы домножили каждую координату на что-то, и потом сместили её...

@Gamst 0 / 0 / 0 Регистрация: 21.04.2010 Сообщений: 20
		1
	Сдвиг и масштабирование графика функции 02.02.2012, 22:40. Показов 4653. Ответов 2 Метки нет (Все метки) Привет!) Написал программу, которая рисует график функции. Как сделать масштабирование( допустим увеличение на 10% или уменьшение) и сдвиг (например на 15 пикселей) по нажатию какой либо клавиши? Если надо будет, то покажу код программы. 0

@Arcor 5705 / 2296 / 466 Регистрация: 20.11.2009 Сообщений: 7,720 Записей в блоге: 1
	03.02.2012, 00:10	2
	ну как на математике сдвигают графики? и тут так же 0

	03.02.2012, 06:39

Сдвиг и масштабирование графика функции

Решение