ObjectPascal AnsiContainsStr Function Returns true if a string contains a substring StrUtils unit

function AnsiContainsStr ( const Haystack, Needle : string ) : Boolean;

Description The AnsiContainsStr function looks for a Needle string in a Haystack string, returning true if it finds it. Otherwise false.   It is a Case sensitive command. Related commands AnsiEndsStr Returns true if a string ends with a substring AnsiStartsStr Returns true if a string starts with a substring AnsiContainsText Returns true if a string contains a substring, case insensitive		Example code : A simple example var   haystack : AnsiString; begin   haystack := 'The cat sat on the mat';   // Note that AnsiContainsStr is case sensitive   if AnsiContainsStr(haystack, 'THE')   then WriteLn('''THE'' was found')   else WriteLn('''THE'' was not found');   if AnsiContainsStr(haystack, 'the')   then WriteLn('''the'' was found')   else WriteLn('''the'' was not found'); end; Show full unit code    'THE' was not found    'the' was found