String.ASCII

ASCII(Source: String): Integer;

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

Sub UserProc;
Var
    s: String;
    i: Integer;
Begin
    s := "String";
    // Получаем ASCII-код первого символа строки
    i := String.ASCII(s);
    Debug.WriteLine("ASCII(""" + s + """) = " + i.ToString);
End Sub UserProc;

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

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