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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 09.06.2015, 20:02   #1
manchester_alan
Форумчанин
 
Регистрация: 07.01.2015
Сообщений: 231
По умолчанию

Как мне сделать чтобы форма двигалась вниз и когда она достигла самого низа экрана, она пошла вверх... а на вверху она пошла вниз...
Код:
if Form2.Top<700 then down;
if Form2.top>700 then up;
но на этом он останавливается просто...( все это через таймер я делаю)

down, up - процедуры как вы поняли...

Последний раз редактировалось Stilet; 10.06.2015 в 08:46.
manchester_alan вне форума Ответить с цитированием
Старый 09.06.2015, 20:59   #2
Sibedir
Тот ещё
Старожил
 
Аватар для Sibedir
 
Регистрация: 14.11.2007
Сообщений: 2,242
По умолчанию

если форма достигла низа, то d := 1
если форма достигла верха, то d := -1
top := top + d
Sibedir вне форума Ответить с цитированием
Старый 09.06.2015, 21:20   #3
evg_m
Старожил
 
Регистрация: 20.04.2008
Сообщений: 5,526
По умолчанию

если форма достигла низа то ее НИЖНИЙ край top+hight "упирается" в НИЖНИЙ край экрана( screen.hight)
если форма достигла верха то ее ВЕРХНИЙ край "упирается" в ВЕРХНИЙ край экрана.

перевод данных фраз на язык программирования оставляю TC (необходимые подсказки даны).
программа — запись алгоритма на языке понятном транслятору
evg_m вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
проверяет пароль при открытие формы, движение рисунка Делфи 7 (есть код программы. нужен другой вариант) программирование Помощь студентам 3 29.09.2013 15:47
Движение колец и Движение линий сверху Iren1993 Помощь студентам 2 07.11.2011 19:48
Обрезка формы по рисунку и ее движение Claster Помощь студентам 0 29.04.2011 10:53
Как перехватить событие формы (Движение) ImmortalAlexSan Общие вопросы Delphi 12 02.01.2011 11:36
Движение формы BaRSyk174 Общие вопросы Delphi 2 17.09.2009 18:52