我有一个文本文件中保存了4组数据,用空格隔开,但是我只想调用后面的两组数据,把他们显示出来,并保存到数组里,同时还能对这个文件进行修改,保存。现在一点思路都没有,各位大虾帮帮忙!!!!!

解决方案 »

  1.   

    MEMO会用吧?先调到MEMO中就是了,这样可以避免直接读写文件的麻烦操作.  Memo1.Lines.LoadFromFile('YourFile.txt');
      Memo1.Lines.SaveToFile('YourFile.txt');
      

  2.   

    或者用TListBox,一定要加上路径
    TListBox.Items.LoadFromFile(路径+'a.Txt');
    TListBox.Items.SaveToFile(路径+'a.Txt');
      

  3.   

    但是我只想调用后面的两组数据啊,最好能像Table一样,但只是显示后面的2组数据。
      

  4.   

    var
      Files :TextFile;
      s :string;
    begin
      AssignFile('你的文件地址', Files);
      reset(Files);
      try
        readln(Files, s);    //s里面存放的是文件中的一行内容,如果要全部读就用循环。
      finally
        CloseFile(Files); 
      end; 
    end;
    剩下的东西你既然用空格分开就这样
    var
      tmp :string;
    begin
      tmp :=Copy(s, 1, Pos(' ', s) - 1);
      //现在tmp中的内容就是空格以前的内容
    end;
      

  5.   

    procedure TForm1.Button1Click(Sender: TObject);
    var
        list1,list2: tstrings;
    begin
        list1 := tstringlist.Create;
        list2 := tstringlist.Create;
        list1.LoadFromFile('xxx.txt');
        list2.Delimiter := ' ';
        list2.DelimitedText := list1.Text;
        showmessage(list2.Text);
        list1.Free;
        list2.Free;end;
      

  6.   

    showmessage(list[0]);
    showmessage(list[1]);
    .....
      

  7.   

    Linux2001(我想买手提电脑啊!)提供了一个思路。
    用他的办法读到a,b,c,d四个变量中,然后只显示和处理c,d两个变量。(a,b,c,d:String;)
      

  8.   

    我觉得Linux2001(我想买手提电脑啊!)的方法是不错的,还可以进一步修改