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

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

Вернуться   Форум программистов > Delphi программирование > Lazarus, Free Pascal, CodeTyphon
Регистрация

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 22.01.2017, 11:37   #1
tmills
Новичок
Джуниор
 
Регистрация: 21.01.2017
Сообщений: 1
По умолчанию Остановка движения в Lazarus

Подскажите, как остановить движения спрайта на середине?
Код:
procedure TForm1.Timer2Timer(Sender: TObject);
begin
    inc(i2);
    Image3.Left:=Image3.Left+10;
    ImageList2.GetBitmap(i2, b);
    Image3.Picture.Bitmap:=b;
    if i2=8 then i2:=0;
end;
tmills вне форума Ответить с цитированием
Старый 22.01.2017, 13:22   #2
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,238
По умолчанию

Выключить таймер
Код:
Timer2.Enabled :=false;
движение и остановится.
Serge_Bliznykov вне форума Ответить с цитированием
Ответ


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

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Остановка потока vipok72 Общие вопросы Delphi 5 01.08.2015 23:17
остановка экрана c# alwgel Помощь студентам 1 04.03.2015 21:30
Перекомпиляция программы(простой) Win Lazarus в Linux Lazarus Toxifer Фриланс 0 27.11.2012 22:46
остановка цикла Emperator12 Общие вопросы Delphi 2 06.10.2012 12:49
Аварийная остановка remz Общие вопросы Delphi 3 03.12.2009 11:34