怎样创建一个文件并把需要的信息导入其中
解决方案 »
- TAdoquery 关闭后,TCP连接还是一直建立,如果解决,谢谢
- 让我无比气愤的事情
- ASTA3怎么使用呢?
- 各位网友,那位知道有一个专门讨论BusinessSkinForm的专门论坛?谢谢!
- 如何解决Delphi报表的图像打印失真?
- 关于双联打印的问题
- 在线等待:Windows启动时弹出“Exception EStackOverflow in moudle ...”的错误提示而无法运行Delphi的程序,why?
- 26.7-21.6-5.1=-1.77635683940025E-15 ???
- 計算日期
- 关于设置ado
- 想用Delphi 7做个邮件小软件(收、发并且是带附件),请问D7里有没有比较成熟的控件???
- 为什么当执行Connection.Close时,数据库连接实际上没有立即断开?
请问这样才能把所需要的数据或文字写入其中
aText:TextFile;
begin
AssignFile(aText,'c:\我的文件.txt');
Rewrite(aText);
WriteLn(aText,'这是第一行文本');
WriteLn(aText,'这是第二行文本');
CloseFile(aText);
//查看C:\我的文件.txt 可看到内容
end;
对于非文本类型的文件:type
aRecord=Record
Name:String[8];
Tel:String[20];
end;
var aFile:file of aRecord;
aRec:aRecord;
begin
AssignFile(aFile,'c:\另一文件.dt');
rewrite(aFile);
aRec.Name:='张三丰';
aRec.Tel:='0871-10000';
Write(aFile,aRec);
CloseFile(aFile);
//打完收工
end;//另:好消息:
网络域名、网站空间优惠,详情请见:
kmok.cn
昆明OK软件工作室
域名为中国最大的域名、虚拟主机提供商 中国万网 提供,空间速度快。