Скачать: CL | DM;

Двигать изображение в TImage   Найти похожие ветки 

← →
Expl   (2005-05-19 19:43) [0]

Здравствуйте. Я хочу реализовать сделать так, чтобы рисунки, которые я загружаю в TImage и которые размерами больше размеров этого TImage, можно было двигать (напр., как в AcdSee). Как обрабатывать все нажатия я знаю, а вот какие параметры надо изменять, чтобы рисунок двигался, нет. Спасибо.

---

← →
-=SSS=-   (2005-05-19 20:16) [1]

Самый простой вариант это подложить под низ TScroolBox. И внутри этого TScroolBox"a положить TImage.
Мона также скачать одну библиотечку
http://www.torry.net/vcl/packs/huge/globuslib.zip
Должна помочь

---

← →
Expl   (2005-05-19 22:20) [2]

Не, со скроллом не подходит. Я хочу сделать так, чтобы нажимаешь мышкой на рисунке, двигаешь мышкой - и двигается рисунок внутри рамки TImage.

---

← →
Eraser ©   (2005-05-19 22:28) [3]

Expl   (19.05.05 22:20) [2]

Тут надо алгоритм придумывать с CopyRect.

---

← →
Expl   (2005-05-19 22:34) [4]

А с Bitmap.Canvas.Draw никак такое сделать нельзя?

---

← →
Eraser ©   (2005-05-19 23:19) [5]

Expl   (19.05.05 22:34) [4]

Можно.

---

← →
Expl   (2005-05-19 23:30) [6]

Я догадываюсь, в этой процедуре можно задавать координаты, но мне нужно как-то считать начальные координаты, чтобы потом их изменить.

---

← →
Eraser ©   (2005-05-20 00:04) [7]

Expl   (19.05.05 23:30) [6]

но мне нужно как-то считать начальные координаты

Сделай глобальные переменные OldX и OldY.

чтобы потом их изменить.

Меняй в обработчике OnMouseMove.

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.027 c