Delphi读取文件和写入文件总结

时间:2015-04-18 16:40:05
【文件属性】:

文件名称:Delphi读取文件和写入文件总结

文件大小:10KB

文件格式:TXT

更新时间:2015-04-18 16:40:05

Delphi 读取文件 写入 文件 总结

示例: procedure TForm1.Button1Click(Sender: TObject); var pMyFile:textfile; pStr : string; begin if OpenDialog1.Execute then begin Assignfile(pMyFile,OpenDialog1.FileName); Reset(pMyFile); while not Eof(pMyFile) do begin Readln(pMyFile,pStr); //fn_DelStock(pStr); //使用读取的字符串相关语句 next; end; CloseFile(pMyFile); end; end;


网友评论

  • 亲测有用,可以参考