delphi文件操作的问题

Question

Var
MyTextFile:TextFile;
S:String;
i:integer;
Begin
AssignFile(MyTextFile,'c:\MyTextFile.txt');
Append(MyTextFile);
Try
For i:=4 to 6 do
Begin
S:='Line  ';
Writeln(MyTextFile,s,i);
End;
Finally
CloseFile(MyTextFile);End;
end;写完后读出来。Var
MyTextFile:TextFile;
S:String;
i：integer；
Begin
AssignFile(MyTextFile,'c:\MyTextFile.txt');
Reset(MyTextFile);
Try
While Not Eof(MyTextFile) do
Begin
        s：=‘Line’；
Readln(MyTextFile, s，i);
 End;
Finally
CloseFile(MyTextFile);
End;
end;在readln 的时候异常，提示invalid numeric input。为什么呢。

Answer 1

Var 
MyTextFile:TextFile; 
S:String; 
i：integer； 
Begin 
AssignFile(MyTextFile,'c:\MyTextFile.txt'); 
Reset(MyTextFile); 
Try 
While Not Eof(MyTextFile) do 
Begin 
        s：=‘Line’； 
//Readln(MyTextFile, s，i); 
Readln(MyTextFile, s);//不要三个参数,我都被你弄糊涂了
End; 
Finally 
CloseFile(MyTextFile); 
End; 
end; 

Answer 2

Var 
MyTextFile:TextFile; 
S:String; 
i：integer； 
Begin 
AssignFile(MyTextFile,'c:\MyTextFile.txt'); 
Reset(MyTextFile); 
Try 
While Not Eof(MyTextFile) do 
Begin 
        s：=‘Line’； 
//Readln(MyTextFile, s，i); 
Readln(MyTextFile, s);
End; 
Finally 
CloseFile(MyTextFile); 
End; 
end; 

Answer 3

Readln(MyTextFile, s，i); 给三个参数的目的是把整数赋给i。readln不是可以跟多个参数！

Answer 4

没赋值???
line的值给s,1的值给i呀。