一个文本文件,分为两部分一部分为标识部分,一部分为数据部分
例如://——————————————//
      标识1 = 00000
      标识2 = 00001
     //——————————————//
    
    正文:数据我只想在memo,中把正文的数据load进来,而不显示标识部分,然后把标识部分另存成一个文件,怎么做呀 各位帮帮小弟吧!最好给出代码,回者有分,急呀!

解决方案 »

  1.   

    全部读出来,然后再进行筛选后往MEMO赋值。。
      

  2.   

    var
      s: TStringList;
    begin
      s := TStringList.Create;
      s.LoadFromFile('c:\a.txt'); // 
      //showmessage(s[5]); // 访问第 5 + 1 行数据,同 Memo1.Lines[5]
      //showmessage(s.Text); // 
      for i:=起始行 to s.count - 1 do
        Memo1.lines.add(s[i]);
      s.Free;
    end;
    用这种方法把它加到MEMO中
      

  3.   

    把标识的放到另外一个TSTringLIst中,直接保存到Text
    var
      s: TStringList;
    begin
    s.SaveToFile('c:\123.txt');
    end;
      

  4.   

    我的是ini 文件
    例如://——————————————//
         [大标识]
          标识1 = 00000
          标识2 = 00001
         //——————————————//
    var
     Str:string;
    begin
       Str := ConfigFile.ReadString('标识','标识','');
      

  5.   

    Str 就是你要的值  
     在把Str写入文件 (这就不要说了吧。呵呵)
      

  6.   

    用stringlist将ini文件的一个section一起读进来,
    inifile.readsection(section, strings);
    然后
    for i := 0 to stringlist.count -1 do
      memol.lines.add(stringlist.valuesfromindex(i));
    就可以了。
      

  7.   

    晕,要程序识别就必须特殊标记代表是标识还是正文
    有了这个就好办了,遍历TStringList里的各条内容就知道标识共几行
    当然,行数可以变,但标识不能变