文件只有一个数字,例如10,要读出来,经过运算后再写进去。

解决方案 »

  1.   

    是什么文件,文本文件吗?
                  AssignFile( MyTextFile , 'c:\MyFile.txt'); 
                  Reset( MyTextFile ); 
                  While Not Eof( MyTextFile ) do 
                     begin 
                       Readln( MyTextFile , ReadText ); 
                     end; 
                  CloseFile( MyTextFile );