Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Проблемы с записью/чтением текстовых файлов!!!!!!!! [D6, WinXP]


d-coder ©   (2002-09-14 21:52:00) 

Люди, объясните, что не правльно: так организована запись

file_name:="config.ini";
if FileExists(file_name)=False then FileCreate(file_name);
AssignFile(F, file_name); //F - переменная типа Text
FileOpen(file_name, fmOpenReadWrite); //через Reset(F) то же самое
...
Writeln(F, info);
CloseFile(F);

Компилятор выдает ошибку ввода-вывода :(. Не понимаю, в чем трабл?
Уверен, что ошибка тупая, но я ее в упор не вижу.
Заранее спасибо


Denvor   (2002-09-15 04:16:00) [1]

Ха!
Да как оно может работать, если вы пытаетесь сделать запись в файл через RESET(f) - это же команда для открытия файла для чтения с первой строки!
Надо через Append(f) - команда для добавления строки в конец файла.


Alexeo   (2002-09-15 02:22:00) [2]

Не путай winapi функции и Делфийские.
Делай так:
if not fileexists(f_name) then
begin
assignfile(f, f_name);
reset(f);
end;

всё работает как на старом добром паскале!


Txxx   (2002-09-14 23:30:00) [3]

Попрбуй вместо
if FileExists(file_name)=False then FileCreate(file_name);
так
if not FileExists(file_name) then FileCreate(file_name);


Наверх

Титульная страница Поиск, карта сайта Написать письмо