24.09.2012, 22:36
|
 |
.
|
|
Регистрация: 18.05.2011
Адрес: Омск
Сообщения: 3,970
Версия Delphi: 3,5,7,10,12,XE2
Репутация: выкл
|
|
Цитата:
|
Сообщение от micron18
Код:
St:='';
BlockRead(F,St,SizeOf(St)); ...
В результате St принимает первоначальное значение, т.е. запись и чтение происходят нормально |
Ну-ну, действуй. |