5,388
社区成员
发帖
与我相关
我的任务
分享请发表友善的回复…
发表回复
Dphiwarrior 2003-08-20
- 打赏
- 举报
谢谢你小查
charles2118 2003-08-20
- 打赏
- 举报
s:='abcdaef';
while pos('1',s)>0 then
s[pos('1',s)]:='1';
while pos('1',s)>0 then
s[pos('1',s)]:='1';
xiaocha 2003-08-20
- 打赏
- 举报
type
TReplaceFlags = set of (rfReplaceAll, rfIgnoreCase);
function StringReplace(const S, OldPattern, NewPattern: string; Flags: TReplaceFlags): string;
StringReplace('abcdaef','a','1',[rfReplaceAll, rfIgnoreCase]);
TReplaceFlags = set of (rfReplaceAll, rfIgnoreCase);
function StringReplace(const S, OldPattern, NewPattern: string; Flags: TReplaceFlags): string;
StringReplace('abcdaef','a','1',[rfReplaceAll, rfIgnoreCase]);
