18.01.2012, 00:09
|
 |
.
|
|
Регистрация: 18.05.2011
Адрес: Омск
Сообщения: 3,970
Версия Delphi: 3,5,7,10,12,XE2
Репутация: выкл
|
|
Это что?
Код:
...
assignfile(afile,'c:\1234567890.txt');
rewrite(output);
writeln(afile,firstb);
CloseFile(afile);
reset(input);
readln(afile,firstb);
CloseFile(afile); // закрываем уже закрытый файл? |