有一个CSV文件,数据如下:
---------------------------------
0:00.000,-0.145,-0.065
0:00.003,-0.145,-0.065
0:00.006,-0.145,-0.065
0:00.008,-0.145,-0.065
0:00.011,-0.145,-0.065
0:00.014,-0.145,-0.065
0:00.017,-0.145,-0.065
0:00.019,-0.145,-0.065
0:00.022,-0.120,-0.080
0:00.025,-0.135,-0.080
0:00.028,-0.145,-0.085
0:00.031,-0.150,-0.085
0:00.033,-0.160,-0.075
0:00.036,-0.155,-0.070
0:00.039,-0.160,-0.070
0:00.042,-0.175,-0.065
0:00.044,-0.180,-0.055
0:00.047,-0.185,-0.050
0:00.050,-0.170,-0.050
0:00.053,-0.155,-0.040
0:00.056,-0.175,-0.040
0:00.058,-0.180,-0.055
0:00.061,-0.190,-0.075
0:00.064,-0.180,-0.080
0:00.067,-0.155,-0.085
0:00.069,-0.135,-0.070
……
---------------------------------
请问前辈们,怎么把它按一行一行的写到数据库?
--------
还有那个时间如:0:00.069和0:00.050,该怎么计算他们的时长?或者这个字符串该怎么转换成时间,然后能计算出时长?
小弟,先谢了!

解决方案 »

  1.   

    直接用StringList就读取,可以一行一行的
      

  2.   

    使用pos函数获取分,秒,毫秒的值,然后再计算。
      

  3.   

    它是字符串啊,再说又有毫秒,我找不到转换日期的函数,StrToTime不行的,出错。
      

  4.   

    看样子这文件记的是 时间差 ,即2行之间的Δtime,这个值又比较小,所以把小时部分省略掉了。procedure TForm1.Button1Click(Sender: TObject);
    var
            str: string;
            tt: TTime;begin
            str := '0:00.069';
            tt := StrToTime('0:'+str);
            showmessage(IntToStr(MilliSecondOf(tt)));
    end;