Форум программистов
 
Контакты: о проблемах с регистрацией, почтой и по другим вопросам пишите сюда - alarforum@yandex.ru, проверяйте папку спам! Обязательно пройдите активизацию e-mail.

Вернуться   Форум программистов > Delphi > Паскаль
Регистрация

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

Ответ
 
Опции темы
Старый 24.01.2018, 05:36   #1
Mihail90
Новичок
 
Регистрация: 24.01.2018
Сообщений: 1
Репутация: 10
По умолчанию Появление и исчезновение фигур на форме в Лазарусе

Здравствуйте программисты, помогите пожалуйста. Нужна программа, в которой должен к примеру появляться на форме прямоугольник, который выдвигается из правого края формы, двигаться до левого края и заходить за него, далее появляется новый и также движется, интервал появления между прямоугольниками должен быть разный. Вот такая задача, помогите пожалуйста с ней.
Mihail90 вне форума   Ответить с цитированием
Старый 24.01.2018, 10:45   #2
evg_m
Профессионал
 
Регистрация: 20.04.2008
Сообщений: 4,665
Репутация: 2097
По умолчанию

Цитата:
должен к примеру появляться на форме прямоугольник
Код:

r:=TShare.Create;
r.Parent:=self;

Цитата:
который выдвигается из правого края формы
Код:

r.Left:=self.Width;

Цитата:
двигаться до левого края
Код:

if r.Left>0 then r.Left:=r.Left-...

Цитата:
и заходить за него
Код:

else if r.Left+r.Width>0 then r.Left:=r.Left-....

else r.Free;//больше он нам не нужен

Цитата:
интервал появления между прямоугольниками должен быть разный
TTimer
Код:

Timer.Interval:=minInterval + Rundom(maxinterval-mininterval);

__________________
программа — запись алгоритма на языке понятном транслятору
evg_m вне форума   Ответить с цитированием
Ответ

Опции темы

Ваши права в разделе
Вы не можете создавать новые темы
Вы не можете отвечать в темах
Вы не можете прикреплять вложения
Вы не можете редактировать свои сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.

Быстрый переход

Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Плавные появление и исчезновение формы BukTop2009 Общие вопросы Delphi 17 21.03.2013 16:46
появление и исчезновение изображения RevenGGe Общие вопросы Delphi 3 20.03.2013 06:30
C++ windows forms появление и исчезновение картинки. GoodAmigo Помощь студентам 0 08.06.2012 15:00
плавное появление/исчезновение объекта TImage Хамяг Общие вопросы Delphi 2 04.12.2011 01:14


03:45.


Powered by vBulletin® Version 3.8.8 Beta 2
Copyright ©2000 - 2018, Jelsoft Enterprises Ltd.

RusProfile.ru


Справочник российских юридических лиц и организаций.
Проекты отопления, пеллетные котлы, бойлеры, радиаторы
интернет магазин respective.ru