function StringReplace(const S, OldPattern, NewPattern: string; Flags: TReplaceFlags): string;