Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 17.11.2012, 14:48   #1
Roman1295
Пользователь
 
Регистрация: 06.09.2012
Сообщений: 51
По умолчанию Запрет выхода за форму.

В который раз ищу, но не могу найти верного ответа.
Нужен запрет выхода изображения за границы формы, которое управляется стрелками.
Пробовал:
Код:
If  Image5.Left+Image5.Top > 0 then
Image5.Left:=Image5.Left-5;
т.е. откидывал картинку на 5 назад. Но не работает, изображение свободно выходит за край, а так же продолжает двигаться.
Пробовал в условии делать больше клиентской ширины, тоже не вышло.
Мне же требуется, чтобы картинку нельзя было двигать (в данном случае - вправо).
Или же попробовать эмулировать нажатие клавиши "влево" при достижении границы правого края. Как такое сделать?
Roman1295 вне форума Ответить с цитированием
Старый 17.11.2012, 15:00   #2
Stilet
Белик Виталий :)
Старожил
 
Аватар для Stilet
 
Регистрация: 23.07.2007
Сообщений: 57,097
По умолчанию

Цитата:
(в данном случае - вправо
Код:
if (Image5.Left+Image5.Width)<width then двигать можно
I'm learning to live...
Stilet вне форума Ответить с цитированием
Старый 17.11.2012, 15:01   #3
Аватар
Старожил
 
Аватар для Аватар
 
Регистрация: 17.11.2010
Сообщений: 18,922
По умолчанию

Цитата:
If Image5.Left+Image5.Top > 0 then
это что, наподобие сравнения веса и цвета?
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
Аватар вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Запрет выхода курсора за форму t2skler Общие вопросы Delphi 14 22.09.2016 16:32
Запрет выхода. Roman1295 Общие вопросы Delphi 0 10.11.2012 22:17
Запрет нажатия кнопки и запрет неправильного ввода данных De_Kurlzz Помощь студентам 1 15.06.2011 15:14
запрет ввода символов в форму MiK_on JavaScript, Ajax 3 19.08.2010 08:37
Одну и ту же форму использовать как MDI-child форму и как модальную форму? PrimaryPro Общие вопросы Delphi 2 10.03.2010 20:52