5,386
社区成员
发帖
与我相关
我的任务
分享字符串问题？
1、将xxx.xxxxxx.xxx转换成xxx_xxxxxx_xxx
2、取xxx.xxxxxx.xxx后面的xxxxxx.xxx
2、取xxx.xxxxxx.xxx后面的xxxxxx.xxx
...全文
请发表友善的回复…
发表回复
KEIGOliye 2003-11-06
- 打赏
- 举报
copy不行 xxx.xxxxxx.xxx的是域名。而域名的长度无法估计的。所以每个位置上的XXX数量不可估计
delphi_xizhousheng 2003-11-05
- 打赏
- 举报
无非就是两个函数 ReplaceString() Copy()
saien 2003-11-05
- 打赏
- 举报
var
s:string;
begin
s:=AnsiReplaceText('xxx.xxxxxx.xxx','.','_');
xxxxxx.xxx:=copy(s,5,length(s)-4);
end;
s:string;
begin
s:=AnsiReplaceText('xxx.xxxxxx.xxx','.','_');
xxxxxx.xxx:=copy(s,5,length(s)-4);
end;
chenkandy 2003-11-05
- 打赏
- 举报
1:AnsiReplaceText('xxx.xxxxxx.xxx','.','_');
2:copy(s,5,length(s)-4);
2:copy(s,5,length(s)-4);
dulei115 2003-11-05
- 打赏
- 举报
copy(s,AnsiPos('.',s)+1,length(s)-AnsiPos('.',s))
aiirii 2003-11-05
- 打赏
- 举报
var I: integer; s: string;
s := 'xxx.xxxxxx.xxx';
i := Pos('.', s);
delete(s, 1, i);
s := 'xxx.xxxxxx.xxx';
i := Pos('.', s);
delete(s, 1, i);
aiirii 2003-11-05
- 打赏
- 举报
s := StringReplace('xxx.xxxxxx.xxx', '.', '_', [rfReplaceAll]);
dulei115 2003-11-05
- 打赏
- 举报
1.StringReplace(s,'.','_',[rfReplaceAll,rfIgnoreCase]);
