比如说123456 变成 12XXXX
当然我做的是不是固定的,我只是想知道如何替换后面的4个字符
解决方案 »
- 安装lazarus遇到问题求解
- Java 调用Delphi写的Web services 老出问题 求助
- 很高兴!散分
- 严重恭喜小花(三J、书生、火星淫)今天过生日 hehe^^
- 高手求教!!!!!!!!!!!!!!!!!!!,
- 我用delphi調用計算器,但我怎樣在程序中取得該結果呢。
- 高分求解。我用ADO连接SQL SERVER的数据库。在连接属性中找不到SQL SERVER的服务器。请问怎么回事?
- 关于调用VC++的DLL
- 如何实现想数据库中添加新纪录?
- 怎样才能通过progressbar反映,程序启动的过程?(progressbar走完,也进入程序了)
- 初学——怎样区分函数和方法?
- 为什么会跳行打印?为什么打印了几行就停止打印了?
myFlags:TReplaceFlags;
s:String;
begin
s:='123456';
showmessage(StringReplace(s,'3456','abcd',myFlags));
end;
s2:='xxxx';
if length(s)>=4 then
begin
s:=copy(s,1,length(s)-4);
s:=s+s2;
end;
str := StuffString( str, Length(str)-4, 4, 'xxxx' );