Последние записи

made in programmersforum 4

Интенсив по Python: Работа с API и фреймворками 24-26 ИЮНЯ 2022. Знаете Python, но хотите расширить свои навыки?
Slurm подготовили для вас особенный продукт! Оставить заявку по ссылке - https://slurm.club/3MeqNEk

Online-курс Java с оплатой после трудоустройства. Каждый выпускник получает предложение о работе
И зарплату на 30% выше ожидаемой, подробнее на сайте академии, ссылка - ttps://clck.ru/fCrQw

26th
Ноя

Смена изображения по времени

Posted by micher under Delphi

По концу таймера должно меняться изображение на одно, затем на второе, затем на третье. Как реализовать?

Stilet



procedure TForm3.Timer1Timer(Sender: TObject);

begin

if TTimer(Sender).tag=3 then TTimer(Sender).tag=1

else TTimer(Sender).tag:=TTimer(Sender).tag+1;

image1.Picture.loadfromfile('E:\проги на делфи\тест\биг'+IntToStr(TTimer(Sender).tag)+'_1.bmp');

end;

Пост написан при поддержке «Авторегион» — лучший выбор автокранов.

Автокран — грузоподъемная машина, предназначенная для погрузочно-разгрузочных и строительных работ. Применяемые шасси серийного (массового) производства КАМАЗ, МАЗ, УРАЛ, МЗКТ и БАЗ позволяют использовать автокраны на рассредоточенных объектах. В зависимости от выбранного шасси (транспортное или вездеход), данная техника может использоваться в любых дорожных условиях, в том числе в условиях бездорожья. Простота эксплуатации, маневренность, ремонтопригодность — неоспоримые преимущества автокранов.

тема на форуме