delphi截取字符串函数 DElphi字符串排序？

DElphi字符串排序？

只要写一个函数，就会得到functionupendstr（Rstr:字符串)：string var i:整数str:字符串开始STR:=rstR//如果字符串的长度为奇数，则3 ifodd（长度（rstR）），然后STR:=rstR“3”//forI:=1tolength（STR）div2 do result:=result STR[I*2]STR[I*2-1]end procedureForm1。按钮1单击（发件人：TObject)开始显示消息（upendStr（“abcdefg”）结束

delphi截取字符串函数 delphi 字符串函数 delphi还有人用吗

版权声明：本文内容由互联网用户自发贡献，本站不承担相关法律责任.如有侵权/违法内容,本站将立刻删除。