![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#2
|
|||
|
|||
![]() - Вместо "While not (AFile) do" делаем "While not EOF(AFile) do".
- try не имеет begin. надо: Код:
Potok:=TStringStream.Create(rec); try ... finally potok.free end; Не забывайте делать резервные копии |