用空格做分割符号
不知道 没条数据是在一行文本中吗?
反正先读取一条数据(放入str1)然后
str1:=Trim(str1);
i:=pos(' ',str1);
n:=0;
while (i>0 )
begin
str[n]:=copy(str1,1,i-1);
str1:=trim(copy(str1,i+1,length(str1)-i-1));
i:=pos(' ',str1);
inc(n);
end;
随便写的也就提醒一个思路。
日期很好处理的,strtoDate()
:)
不知道 没条数据是在一行文本中吗?
反正先读取一条数据(放入str1)然后
str1:=Trim(str1);
i:=pos(' ',str1);
n:=0;
while (i>0 )
begin
str[n]:=copy(str1,1,i-1);
str1:=trim(copy(str1,i+1,length(str1)-i-1));
i:=pos(' ',str1);
inc(n);
end;
随便写的也就提醒一个思路。
日期很好处理的,strtoDate()
:)
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货