Процедура таймера и движения второго объекта
Значение свойства Interval выставлено 100.
Используется счетчик увеличения на величину скорости.
Величина свойства Left изображения будет принимать увеличивающиеся значения при выбранном направлении движения слева направо и уменьшающиеся значения при направлении движения в обратном направлении.
Результатом работы данного процесса есть визуальное отображение движения изображения в соответствующем направлении.
На скриншоте программы отображено движение вертолетов навстречу друг другу.
Procedure TForm1.Timer2Timer(Sender: TObject);
begin
If j<=put2 then begin
j:=j+sk2;
If CheckBox1.Checked=False then Image2.Left:=j
else Image3.Left:=555-j;
end
else begin Timer2.Enabled:=False;j:=0;end;
end;
Перейти к стр.11 Преимущества программы. Резюме
Новые проекты детей
Наши баннеры
Сайт Обучонок содержит исследовательские работы и индивидуальные проекты учащихся, темы проектов по предметам и правила их оформления, обучающие программы для детей.
Статистика
