2017年4月5日
delphi写入文本文件代码
摘要： procedure TForm1.btn1Click(Sender: TObject);VarF : Textfile;Str,FileName:String;i:integer;Begin filename:=extractfilepath(application.ExeName)+'/'+for 阅读全文
posted @ 2017-04-05 18:00 guoguo7325 阅读(163) 评论(0) 推荐(0) 编辑