Ваш ключ: необходима авторизация | MyProxy - бесплатный обменник валидных прокси между пользователями форума.

[Урок #12] Анимация в Delphi

Тема в разделе Delphi, создана пользователем #Light, 11 июн 2016.

Войдите для ответа
  1. #Light Заблокирован

    #Light
    Статус:
    Вне сети
    Сообщения:
    316
    Симпатии:
    0
    Регистрация:
    01.06.15
    Добрый вечер друзья, я бы хотел рассказать вам как сделать анимации в Delphi.

    Нам понадобится фон (для программы), мотоцикл и машина, они будут двигаться в разные стороны, по форме.

    Код:
    procedure TForm1.Timer1Timer(Sender: TObject);
    
    begin
    x:=x+2;
    x1:=x1-2;
    if x>scr_width+image2.Width then x:=-image2.Width;
    if x1<-image3.Width then x1:=scr_width;
    
    image2.Left:=x;
    image3.Left:=x1;
    end;
     
    11 июн 2016 #1
    Последнее редактирование: 11 июн 2016
Загрузка...
Похожие темы
  1. #Light
    Ответов:
    0
    Просмотров:
    95
  2. #Light
    Ответов:
    0
    Просмотров:
    109
  3. #Light
    Ответов:
    0
    Просмотров:
    99
  4. #Light
    Ответов:
    0
    Просмотров:
    94
  5. #Light
    Ответов:
    0
    Просмотров:
    108
Top