![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Обработка ИС [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"шник, вылетать не будет.