Авторизация

Логин: Пароль:
Регистрация Забыли свой пароль?

IOResult

Страницы: 1
IOResult
#1
12.12.2009 17:55:34
Собственно хочется знать есть ли в PascalABC.Net это функция, потому что в TurboPascal да и в Borland она есть?
 
 
#2
12.12.2009 17:59:56
IOResult нет. Вообще, насколько я знаю в .Net нельзя, что-то сделать с ошибкой и не получить исключение.
 
 
#3
12.12.2009 18:01:13
Используйте исключения
Код
try
 Reset(f);
except
 writeln('Error');
end;
 
 
#4
12.12.2009 18:08:28
Еще лучше так, тогда выводиться подробное сообщение по ошибке.
Код
try
 Reset(f);
except
 on e : exception do
  writeln(e);
end;
 
 
#5
12.12.2009 18:23:22
Артем если так делать то выводиться какая-то системная информация, короче, ничегот нельзя. Понять можно как нибудь сделать так чтобы выводилось 1 или 0, то есть как c IOResult.
 
 
#6
12.12.2009 18:27:04
Тогда можно создать переменную IOResult.
Код
procedure MyReset(f: text);
begin
  try
    Reset(f);
  except
    IOResult := 1;
  end;
end;
 
 
#7
12.12.2009 22:10:35
Ага, спасибо, понял, реализую.
 
 
 
Страницы: 1
Читают тему (гостей: 1, пользователей: 0, из них скрытых: 0)