当前位置:首页
开发技术指南» 文章正文
    引言:

    摘要: vb中怎么调用? 并且因为通用性问题怎么使别人也能用,把自己的宏一起copy过去?宏放在哪个目录里的? ......
    摘要: 多少钱一个页面? ......


Delphi直接读文本文件然后逐行读取数据的程序怎么写

Delphi直接读文本文件然后逐行读取数据的程序怎么写?急急急!

NO.1   作者: koren

第一行就是str.Strings[0],第十行就是str.Strings[9];  
  var  
      str:tstringlist;  
  begin  
      str:=tstringlist.Create;  
      str.LoadFromFile(d:\a.txt);  
      form1.caption:=str.Strings[0]+   +str.Strings[9];  
      str.free;  
  end;      
 

NO.2   作者: sdzeng

procedure   TForm1.Button1Click(Sender:   TObject);  
  var  
          fFile   :   Textfile;  
          sLine   :   string;  
  begin  
          AssignFile(fFile,E:\book2.txt);  
          {$I-}  
          Reset(fFile);  
          {$I+}  
          if   IOResult=0   then  
          begin  
                  sArray   :=   VarArrayCreate([0,0],varVariant);  
                  while   not   Eof(fFile)   do  
                  begin  
                        Readln(fFile,sLine);  
                  end;  
          end;  
          CloseFile(fFile);  
  end;


 ·開群,    »显示摘要«
    摘要: 高级c++ builder 开发交流群 :11155920 ......
» 本期热门文章:

©2000-2007 All Rights Reserved. 最佳浏览:1024X768 MSIE