Source position: flcStrings.pas line 1322
procedure StrEnsureNoSuffixA(
var S: AnsiString;
const Suffix: AnsiString;
const AsciiCaseSensitive: Boolean = True
);