Ord(X: String) : Integer
Код символа

Функция Ord возвращает код первого символа строки X.

Procedure OnCreate;
Var
  C : Integer;
Begin
  C := Ord('A');
  Warning(ToStr(C)); // 65
End;

Смотри функцию Chr.

© RTIT