- 博客(1)
- 收藏
- 关注
原创 分隔字符串
procedure TForm1.Split(Mstr:String; Sstr: String; var Darray: array of string); var i,k,m:integer; tStr:String; begin k:=0; m:=Length(Mstr);
2007-10-14 11:51:00 327
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人
procedure TForm1.Split(Mstr:String; Sstr: String; var Darray: array of string); var i,k,m:integer; tStr:String; begin k:=0; m:=Length(Mstr);
2007-10-14 11:51:00 327
TA创建的收藏夹 TA关注的收藏夹
TA关注的人