Результаты поиска по запросу "try-except"
@ Давид: Я должен согласиться. Если я переключу порядок операторов в блоке finally, Screen.Cursor не будет изменен обратно, если Obj.Free вызовет исключение. Это оставляет две попытки .. окончательно конструировать как единственно правильное решение, как уже сказал Андреас. Я обычно предполагаю, что назначения Screen.Cursor не могут быть неудачными, но это может быть просто ошибкой.
ите следующий код в качестве примера: procedure TForm1.Button1Click(Sender: TObject); var Obj: TSomeObject; begin Screen.Cursor:= crHourGlass; Obj:= TSomeObject.Create; try // do something finally Obj.Free; end; Screen.Cursor:= crDefault; ...
Зачем использовать обработку исключений в явно «безопасном» коде?
Пожалуйста, может кто-нибудь объяснить мне, что может вызвать исключение в этом коде? function CreateBibleNames: TStrings; begin Result := TStringList.Create; try Result.Add('Adam'); Result.Add('Eva'); Result.Add('Kain'); ...
Как повторить попытку после исключения?
У меня есть цикл, начинающийся сfor i in range(0, 100), Обычно он работает правильно, но иногда происходит сбой из-за условий сети. В настоящее время он настроен так, что при сбое он будетcontinue в исключении (переходите к следующему номеру ...
это механизм обработки исключений для исключений, генерируемых Windows. Они не такие, как исключения C ++.
кнулся на эту статью об обнаружении VMWare или Virtual PC http://www.codeproject.com/KB/system/VmDetect.aspx [http://www.codeproject.com/KB/system/VmDetect.aspx] и я увидел, что они используют какое-то утверждение-исключение. Итак, я посмотрел в ...
Как повторить попытку после исключения?
У меня есть цикл, начинающийся с
Страница 1 из 2