Увеличение Image - Мультимедиа в Delphi

marusua · 30.04.2013, 01:15

Здравствуйте!
Подскажите, пожалуйста, как можно реализовать в Delphi - нажимаешь на Image, изображение увеличивается, а при повторном нажатии - уменьшается?

misher · 30.04.2013, 09:49

Можно реализовать несколькими способами:
1. Просто изменять ширину и высоту, если форма позволяет...
2. Открывать в новой форме увеличенное изображение, предварительно загрузив его туда, или загружать потом из пути..

VIK_aka_TOR · 30.04.2013, 11:32

коль совсем подробно:

заводим одну переменную, которая показывает, открыта она и увеличена или находится в нормальном режиме
кидаем на форму Image и на событие OnClick этого Image
в OnClick при нажатии меняем флаг из первого пункта на противоположный, и в зависимости от него увеличиваем ширину и длину имаги или уменьшаем

marusua · 30.04.2013, 12:28

Цитата:

Сообщение от VIK_aka_TOR

коль совсем подробно:

заводим одну переменную, которая показывает, открыта она и увеличена или находится в нормальном режиме
кидаем на форму Image и на событие OnClick этого Image
в OnClick при нажатии меняем флаг из первого пункта на противоположный, и в зависимости от него увеличиваем ширину и длину имаги или уменьшаем

спасибо большое))

marusua · 30.04.2013, 12:29

Цитата:

Сообщение от misher

Можно реализовать несколькими способами:
1. Просто изменять ширину и высоту, если форма позволяет...
2. Открывать в новой форме увеличенное изображение, предварительно загрузив его туда, или загружать потом из пути..

спасибо!!!

Алексей_2012 · 03.06.2013, 23:00

А если надо растянуть на всю форму, то обрабатываем ондаблклик, проверяем условие, если алигн не alclient, то меняем на алклиент, иначе указываем размер ширины и высоты картинки. и у timage меняем стреч на true

30.04.2013, 01:15	#1
marusua Пользователь Регистрация: 22.10.2011 Сообщений: 32	Увеличение Image Здравствуйте! Подскажите, пожалуйста, как можно реализовать в Delphi - нажимаешь на Image, изображение увеличивается, а при повторном нажатии - уменьшается?

30.04.2013, 09:49	#2
misher Участник клуба Регистрация: 26.05.2010 Сообщений: 1,648	Можно реализовать несколькими способами: 1. Просто изменять ширину и высоту, если форма позволяет... 2. Открывать в новой форме увеличенное изображение, предварительно загрузив его туда, или загружать потом из пути.. This world will never be What I expected (c)

30.04.2013, 11:32	#3
VIK_aka_TOR Участник клуба Регистрация: 30.01.2011 Сообщений: 1,578	коль совсем подробно: заводим одну переменную, которая показывает, открыта она и увеличена или находится в нормальном режиме кидаем на форму Image и на событие OnClick этого Image в OnClick при нажатии меняем флаг из первого пункта на противоположный, и в зависимости от него увеличиваем ширину и длину имаги или уменьшаем пишу код не только за печеньки

03.06.2013, 23:00	#6
Алексей_2012 t45t Участник клуба Регистрация: 20.03.2012 Сообщений: 1,849	А если надо растянуть на всю форму, то обрабатываем ондаблклик, проверяем условие, если алигн не alclient, то меняем на алклиент, иначе указываем размер ширины и высоты картинки. и у timage меняем стреч на true from dark to light)

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
При столкновении между image переместить другой Image	Алексей_2012	Общие вопросы Delphi	1	07.03.2013 09:32
Плавно убрать Image или Image+AlphaBlend	ViniPux1112	Мультимедиа в Delphi	1	10.12.2012 23:55
Увеличение ширины Image без растягивания рисунка	artemavd	Общие вопросы Delphi	20	28.01.2011 17:40
EPNGMissingMultipleIDAT. This PNG Image is invalid because it has missing image parts	kardinal94	Общие вопросы Delphi	0	08.10.2010 20:31
Вопрос по Image (скачанная картинка не хочет выводиться в Image)	Radnor	Мультимедиа в Delphi	2	06.07.2009 02:20