Расчёт тяги

[Shouldercannon]

Доброго времени суток!
Есть два TrackBar-а 0-50-100 (TrackBar1) и -100-0-100 (TrackBar2).
При перемещении ползунка TrackBar1 от 0 до 50 на TrackBar2 должно осуществляться перемещение ползунка от -100 до 0. При перемещении ползунка TrackBar1 от 50 до 100 на TrackBar2 должно осуществляться перемещение ползунка от 0 до 100.
Не получается реализовать вычисление, даже понять как вычислять.

  if TrackBar1.Position < 50 then TrackBar2.Position := ;
  if TrackBar1.Position = 50 then TrackBar2.Position := 0;
  if TrackBar1.Position > 50 then TrackBar2.Position := ;

[Toxa]

TrackBar2.position := (Trackbar1.position - 50) * 2

пойдет?

[Shouldercannon]

То, что надо. Спасибо.