Var
FileVar:File Of String[100];
TmpStr:String[100];
Begin
AssignFile(FileVar,'Test.txt');
ReWrite(FileVar);
Read(FileVar,TmpStr); //Error
......
End.
Why?What shall I do?
...全文
948打赏收藏
关于DELPHI类型文件操作
Var FileVar:File Of String[100]; TmpStr:String[100]; Begin AssignFile(FileVar,'Test.txt'); ReWrite(FileVar); Read(FileVar,TmpStr); //Error ...... End. Why?What shall I do?