| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Работа с тектовыми файлами
align © (2006-04-05 13:58:00)Скажите пожалуйста, что не нравится дельфи7:
Если файл существует(if FileExists('C:\otkl.log')), то
AssignFile(txtfile,'C:\otkl.log');
Append(txtfile);
Writeln(txtfile,'');
и все хорошо
а если файла нет, то я делаю так
Filecreate('C:\otkl.log');
AssignFile(txtfile,'C:\otkl.log');
Append(txtfile);
Writeln(txtfile,'');
и результат - файл создался, но данные не внеслись и выдает I/O 32.
Подскажите пожалуйста!
TUser (2006-04-05 19:39:00) [1]http://www.delphikingdom.ru/lyceum/seminar.asp?ID=2
align (2006-04-05 16:05:00) [2]А, спасибо, вспомнил, точно была такая команда, извените...
icWasya (2006-04-05 14:19:00) [3]а если файла нет, то я делаю так
AssignFile(txtfile,'C:\otkl.log');
rewrite(txtfile);
Writeln(txtfile,'');
Плохиш (2006-04-05 14:01:00) [4]Во втором случае rewrite. Пора почитать чего-нибуть.
| |
