Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.02.20;
Скачать: CL | DM;

Вниз

Обработка ИС   Найти похожие ветки 

 
Igit ©   (2003-02-11 16:33) [0]

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

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


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

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


 
Smithson ©   (2003-02-11 16:50) [2]

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


 
Igit ©   (2003-02-11 17:18) [3]

Не получается... пробовал так:
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.


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


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

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

uses Windows, SysUtils;



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

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


 
Igit ©   (2003-02-11 19:49) [6]

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



Страницы: 1 вся ветка

Текущий архив: 2003.02.20;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.021 c
4-63896
Shock
2003-01-03 00:31
2003.02.20
Помощь в обращении с компом


3-63534
Jdrm
2003-02-03 12:15
2003.02.20
Invalid BLOB handle in record buffer


14-63738
Тип
2003-02-05 13:07
2003.02.20
Есть ли FIBPlus для D6 полность бесплатные?


3-63478
Nick-From
2003-02-04 16:58
2003.02.20
Процедура сравнения


14-63799
DiamondShark
2003-02-03 16:14
2003.02.20
Нетривиальная, однако, задачка...