参考实例:
var
F: TextFile; // 声明文本文件类型变量
begin
AssignFile(F, 'C:\MyFile.txt');
end;
// 将C:\MyFile.txt文件与F变量建立连接,后面可以使用F变量对文件进行操作。
将外部一个文件名 c:\1.txt ,以变量的形式关联,如
const
cnsFilename='c:\1.txt';
var
F:Text;// 以文本的形式,也可以以其他形式。
begin
AssignFile(F,cnsFilename);
try
if FileExists(cnsFilename) then
Append(F)
else
Rewrite(F);
Writeln(F,'hellow world.');
finally
CloseFile(F...
链接一个文件,看帮助,写的那么清楚你不看
Delphi(Pascal) code var F: TextFile; S: string;begin if OpenDialog1.Execute then { Display Open dialog box } begin AssignFile(F, OpenDialog1.FileName); { File selected in dialog } ...
标签:AssignFile,delphi,函数