String.Contains

Contains(Source: String, SubStr: String): Boolean;

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

Sub UserProc;
Var
    s1, s2: String;
    b: Boolean;
Begin
    s1 := "Calculator";
    s2 := "Calc";
    // Проверяем наличие подстроки в исходной строке
    b := String.Contains(s1, s2);
    Debug.WriteLine("Contains(""" + s1 + "; " + s2 + """) = " + b.ToString);
End Sub UserProc;

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

Public Shared Sub Main(Params: StartParams);
Var
    s1, s2: string;
    b: boolean;
Begin
    s1 := "Calculator";
    s2 := "Calc";
    // Проверяем наличие подстроки в исходной строке
    b := s1.Contains(s2);
    System.Diagnostics.Debug.WriteLine("Contains(""" + s1 + "; " + s2 + """) = " + b.ToString());       
End Sub;