[roman]

O bien, cambiar Position por Max - Position. Se puede hacer una función sencilla para ajustar la posición:

Código Delphi [-]
procedure SetPosition(TrackBar: TTrackBar; Pos: Integer);
begin
  TrackBar.Position := TrackBar.Max - Pos;
end;

// Saludos