intptr_t TStrings::IndexOfName(const UnicodeString & Name) const { for (intptr_t Index = 0; Index < GetCount(); ++Index) { UnicodeString S = GetString(Index); intptr_t P = ::AnsiPos(S, L'='); if ((P > 0) && (CompareStrings(S.SubStr(1, P - 1), Name) == 0)) { return Index; } } return NPOS; }
bool EndsStr(const UnicodeString & SubStr, const UnicodeString & Str) { if (SubStr.Length() > Str.Length()) return false; return Str.SubStr(Str.Length() - SubStr.Length() + 1, SubStr.Length()) == SubStr; }
bool EndsStr(UnicodeString SubStr, UnicodeString Str) { if (SubStr.Length() > Str.Length()) return false; return Str.SubStr(Str.Length() - SubStr.Length() + 1, SubStr.Length()) == SubStr; }