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

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

По поводу одновременного доступа к файлам [D6, Win95/98]


son_g ©   (2006-01-24 11:55:00) 

Есть такая проблема
Подключаю файл, считываю данные с интервалом определённым

Assignfile(f,'c:\disp.txt');
reset(f);
i:=1;
While not EOF(f) do begin
readln(f,str[i]);
inc(i);
if i=4 then
i:=1;
end;
rewrite(f);
closefile(f);

Но дело в том что я параллельно в этот файл записываю с другой проги, которая написана на кларионе, данные для считывания...

Как сделать так чтобы окошко I/O Error не выскакивало, а то кассиры бесяться...

Отмыльте если кто что знает son_g@mail.ru


son_g   (2006-01-25 12:35:00) [1]

Это не помогло:

> попробуй перед своим кодом вставить такую строку:
> SetErrorMode(SEM_FAILCRITICALERRORS);


а это помогло:

> вставить {I-} Reset {I+} if( IOResult ...

Спасибо большое


VirEx   (2006-01-24 18:17:00) [2]

попробуй перед своим кодом вставить такую строку:
SetErrorMode(SEM_FAILCRITICALERRORS);


Desdechado   (2006-01-24 13:13:00) [3]

или работать через виндовые функции
или вставить {I-} Reset {I+} if( IOResult ...


Наверх

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