本文介绍了一个使用 Delphi 实现的字符串替换函数 DecodeString。该函数接受两个参数：原始字符串 Str 和用于替换的字符串 deStr，并返回一个经过替换操作后的 TStringList 对象。在函数内部，通过 StringReplace 方法进行字符串替换，采用 rfReplaceAll 选项确保所有匹配项都被替换。
function DecodeString(Str, deStr: string ): TStringList;var StringList:TStringList;begin StringList:=TStringList.Create; stringList.Text := StringReplace(Str, deStr,#13, [rfReplaceAll]); result := stringList;end; function DecodeString(Str, deStr: string ): TStringList;var StringList:TStringList;begin StringList:=TStringList.Create; stringList.Text := StringReplace(Str, deStr,#13, [rfReplaceAll]); result := stringList;end; 
扫一扫
被折叠的 条评论
为什么被折叠?
到【灌水乐园】发言
