Delphi制作媒体播放器：代码ABs

procedure TMainForm.TBLengthChange(Sender: TObject);
begin
if Abs((MPlayer.Position div 1000)-TBLength.Position) >=1 then
begin
if MPlayer.Mode=mpPlaying then
begin
MPlayer.Pause;
Timer.Enabled:=False;
MPlayer.Position:=TBLength.Position*1000;
MPlayer.Play;
Timer.Enabled:=True;
end
else
MPlayer.Position:=TBLength.Position*1000;
StatusBar.Panels[0].Text:='ﾒﾑｲ･ｷﾅ: '+IntToStrTime(TBLength.Position);
end;
end;

如上请问这里的“ABs”是什么意思，详解更好，O(∩_∩)O谢谢

取绝对值的函数。