请问在delphi中如何精确读取某一行的第三个数,数之间用空格分开,
2:如何比较出文本中那些数在我要查找的数的误差之内,比如要查打出80 +/-  3的所有的数(就是77到83之间)初次接触delpi,请大侠指教!谢谢了!

解决方案 »

  1.   

    (鄙视20分就想占2个便宜的-_-!)
    只回答第一题:
    1.
    (1)用Tstringlist将所有行都读进来
    var
     sl:Tstringlist;
     x,i,j:integer;//sl下标从0开始,所以sl[0]即表示第一行
     str,result:string;sl.loadfromfile('D:\1.txt');
    (2)
    str:=sl[x];
    (3)
    这个用pos,或者posEx ,注意用posEx的话要引用类库 uses ...忘了名了。可能是StrUtils
    i:=posEx(str,' ',1);//第一个空格位置
    j:=posEx(str,' ',i+1);//第二个
    result:=copy(str,j+1,posEx(str,' ',j+1)-j);//Your Result
    要是多的话就循环做
      

  2.   

    估计你还是没明白,开的东西太多了,不好进Delphi给你敲完整的呢
      

  3.   

    1楼有点问题
    sl:=Tstringlist.create;//初始化str:=sl.Strings[x];//好久没用了,写错了,不好意思
      

  4.   

    jason_kou 兄弟,对不起哈!第一次在这提问,不知道分数,是系统默认的!还可以加吗?