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

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

Обработка ИС [D5]


Igit ©   (2003-02-11 16:33:00) 

Для проверки файла на занятость использую это:
try
Assignfile(source, opensavedialog1.Filename);
reset(source);
closefile(source);
except
label3.Caption:="Файл используемый Windows";
exit;
end;

Но прога вылетает.


Igit   (2003-02-11 19:49:00) [1]

Можно ли обойтись без использования модуля SysUtils ?


Shadow   (2003-02-11 18:00:00) [2]

Да, ем, к чему такие сложности??? Обрабатываю IORESULT и все, мля...


Mars   (2003-02-11 17:58:00) [3]

Добавь модуль

uses Windows, SysUtils;


Igit   (2003-02-11 17:18:00) [4]

Не получается... пробовал так:
Program Test;
uses Windows;
var source:file;
begin
try
Assignfile(source, Paramstr(0));
reset(source);
closefile(source);
MessageBox(0, "Все замечательно", "Test", MB_OK);
except
MessageBox(0, "Ошибка при открытии", "Test", MB_OK);
end;
end.


Ну никак не работает


Smithson   (2003-02-11 16:50:00) [5]

Вернее, среда Delphi тоже обрабатывает исключения. Это можно отключить в меню Tools -> Debbuger Option -> Stop On Language Except. Снять галку - совсем не будет хватать ошибки или можно добавить неинтересующие ИС в список.


Mars   (2003-02-11 16:48:00) [6]

Обработка исключительных ситуаций из под Delphi не работает!
Запусти откомпилированый EXE"шник, вылетать не будет.


Наверх

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