SmartPascal AnsiContainsText Function Returns true if a string contains a substring, case insensitive StrUtils unit

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

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