Значение свойства 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;