Char.ASCII

ASCII(Source: Char): Integer;

Отсутствует;

Sub UserProc;
Var
    c: Char;
    i: Integer;
Begin
    c := 'a';
    // Получаем ASCII-код символа
    i := Char.ASCII(c);
    Debug.WriteLine("ASCII('" + c + "') = " + i.ToString);
End Sub UserProc;

Ввиду отсутствия реализации на языке Fore.NET для получения ASCII-кода используйте методы класса Encoding:

Public Shared Sub Main(Params: StartParams);
Var
    c: char;
    encodingArr: Array Of char;
Begin
    c := 'a';
    encodingArr := New char[1] = [c];
    // Получаем ASCII-код символа
    System.Diagnostics.Debug.WriteLine("ASCII('" + c + "') = " + +System.Text.Encoding.UTF8.GetBytes(encodingArr)[0]);
End Sub;