delphi截取字符串函數(shù) DElphi字符串排序?
DElphi字符串排序?只要寫一個函數(shù),就會得到functionupendstr(Rstr:字符串):string var i:整數(shù)str:字符串開始STR:=rstR//如果字符串的長度為奇數(shù),則3
DElphi字符串排序?
只要寫一個函數(shù),就會得到functionupendstr(Rstr:字符串):string var i:整數(shù)str:字符串開始STR:=rstR//如果字符串的長度為奇數(shù),則3 ifodd(長度(rstR)),然后STR:=rstR“3”//forI:=1tolength(STR)div2 do result:=result STR[I*2]STR[I*2-1]end procedureForm1。按鈕1單擊(發(fā)件人:TObject)開始顯示消息(upendStr(“abcdefg”)結(jié)束