Как увеличить изображения, загруженные в элемент управления TImage в Delphi XE2 Trial?

Question

Я разработал небольшую утилиту для загрузки различных типов файлов изображений в TImage управление в Delphi XE2. Теперь я хотел бы реализовать и протестировать функцию масштабирования, используя только встроенные элементы управления (т.е. не используя какой-либо сторонний компонент).

Answer 1

Смотрите вторую часть этого ответа, которая увеличивает и уменьшает масштаб изображения с помощью колесика мыши.

Примечание. Перемещает компонент изображения.