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

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

TFileStream [D6, WinXP]


kosmach ©   (2002-08-12 07:57:00) 

Такая проблема. Мне нужно один и тот же файл открыть для чтения одновременно с помощью TFileStream.Create. Однако сделать это таким путем
FS1, FS2: TFileStream;
...
FS1:=TFileStream.Create("file", fmOpenRead);
FS2:=TFileStream.Create("file", fmOpenRead);

не получается. Можно ли вообще что либо подобное сделать, или хотя бы отловить ошибку, при повторной попытке открыть файл, потому как блок try... except здесь не работает.
Если где-то непонятно выразился, могу уточнить. Помогите пожалуйста.


Viktor Kushnir   (2002-08-13 08:33:00) [1]

Я оббычто недаю примерно так.
FS1:=TFileStream.Create("file", fmOpenRead);
Try
// делай что нибудь
Finally
FS1.free
End;


kosmach   (2002-08-12 08:45:00) [2]

Спасибо, большое. Все работает, но можно еще маленький вопросик на будущее. Как вообще обрабатывать ошибки при работе с потоками?
Не обижусь на какую-нибудь ссылочку или примерчик, вообщем что-нибудь;)))


Ученик   (2002-08-12 08:29:00) [3]

fmOpenRead or fmShareDenyNone


Наверх

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