我是新手，问一个文件操作的问题

Question

我想通过点击按钮1后创建一个TXT文件。源代码如下：
 procedure TForm1.Button1Click(Sender: TObject);
var F:Textfile;
Begin
　AssignFile(F, 'c:\ek.txt'); {将文件名与变量 F 关联}
　ReWrite(F); {创建一个新的文件并命名为 ek.txt}
　Closefile(F); {关闭文件 F}
end;报错信息是：[Error] Unit1.pas(30): Illegal character in input file: '　' ($A1A1)
[Error] Unit1.pas(31): Illegal character in input file: '　' ($A1A1)
[Error] Unit1.pas(32): Illegal character in input file: '　' ($A1A1)
[Fatal Error] Project1.dpr(5): Could not compile used unit 'Unit1.pas'我刚接触DELPHI不久，请问这个错误是怎么回事？该怎么解决？

Answer 1

在'c:\ek.txt'有非法字符，你将此文件的内容修改一下试试。

Answer 2

呵呵， 你肯定是在别的地方Copy的代码吧！
[Fatal Error] Project1.dpr(5): Could not compile used unit 'Unit1.pas'说明是编译时错误，当然不会是文件的内容有错了。是你的代码前后有非法字符（不过看不见）。你将每行前后删空就可以了。————————————————————————————————————
宠辱不惊，看庭前花开花落，去留无意；毁誉由人，望天上云卷云舒，聚散任风。
————————————————————————————————————

Answer 3

我晕~~好象真的是字符的问题~！
  我用论坛里的某个相近的程序复制上去，竟然OK了！！
var F: TextFile;begin
  AssignFile(F, 'NEWFILE.$$$');
  Rewrite(F);
  Writeln(F, 'Just created file with this text in it...');
  CloseFile(F);
end;
   但是我实在看不出我写的程序有什么问题
   忙了一天，真是郁闷哦.....
  谁能看得出来啊，钱照给！

Answer 4

把你AssignFile、ReWrite、Closefile、Closefile前面的非法空格去掉，象下面一样
或者重新加上空格，一切就ok了。
空格也会有非法的procedure TForm1.Button1Click(Sender: TObject);
var F:Textfile;
Begin
AssignFile(F, 'c:\ek.txt'); {将文件名与变量 F 关联}
ReWrite(F); {创建一个新的文件并命名为 ek.txt}
Closefile(F); {关闭文件 F}
end;