Помогите определить функцию (Шифр Цезаря)

[Scorpion1991]

procedure TForm1.Button1Click(Sender: TObject); // Шифровка надписи

begin

st:=memo1.lines.Text; // Присваивание переменной st значение текстового поля

x:=3; // значение ключа

memo2.Lines.Clear; // очистка поля memo

for i:=1 to length(st) do // Алгоритм шифровки текста

if (st<>'') then

begin

s:=chr((ord(st)+x));

memo2.lines.Text:=memo2.lines.Text+s;

end;

Эта программа написана на Delphi, меня интересует именно эта функция s:=chr((ord(st)+x)); Ord - Что она выполняет???

[superman]

http://lmgtfy.com/?q=Delphi+ord