Форум: "Основная";
Текущий архив: 2005.08.21;
Скачать: [xml.tar.bz2];
ВнизВопрос по try ... except Найти похожие ветки
← →
Destroyer © (2005-07-31 20:45) [0]Не получается присвоить значение переменной в конструкции try ... except :
var val: boolean;
begin
try
...
except
val:= false; // тут вылетает ошибка access violation
end;
end;
Почему так? Как правильно присвоить значение?
← →
Гаврила © (2005-07-31 20:47) [1]Почему ты решил, что не присваивается?
← →
Anatoly Podgoretsky © (2005-07-31 20:51) [2]Не полный код
← →
Destroyer © (2005-07-31 20:58) [3]Ок, вот полный:
try
checkingreg:=true;
asm
mov eax,ilong
call eax
end;
except
if nbOnPan=3 then
begin
Form1.spSkinMessage1.MessageDlg("xxx",mtInformation,[mbOk]{mbOKCancel},1);
checkingreg:=false; // здесь ошибка
exit; // и здесь тоже ошибка, но есть подозрение, что exit в except использовать нельзя
Но даже без exit ошибка в checkingreg:=false; Что тут не так?
← →
Anatoly Podgoretsky © (2005-07-31 20:59) [4]О еше новые неопределенные переменные появились
← →
Destroyer © (2005-07-31 21:03) [5]Извиняюсь.
checkingreg: boolean;
ilong :integer;
nbOnPan :integer;
← →
Palladin © (2005-07-31 21:14) [6]Либо убери галку в Tools\Debugger Options\Language Exceptions\Stop on Delphi Exceptions
Либо исключение возникает в другом месте
← →
Anatoly Podgoretsky © (2005-07-31 22:12) [7]Когда же тя приведешь более полный код с заголовком обгрызок чего ты нам представляешь, с местами определения функций.
Palladin © (31.07.05 21:14) [6]
Возможно жто огрызок объекта
← →
Amido (2005-08-02 13:59) [8]А ни тут ли случайно ошибка?
Form1.spSkinMessage1.MessageDlg("xxx",mtInformation,[mbOk]{mbOKCancel},1);
← →
Defunct © (2005-08-02 15:53) [9]Destroyer © (31.07.05 20:58) [3]
Ужас а не код ;>
Тут не к доктору, тут в морг.
> call eax
этим вы вероятно убиваете стек к чертям, после чего поведение отладчика будет непредсказуемым.
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2005.08.21;
Скачать: [xml.tar.bz2];
Память: 0.46 MB
Время: 0.052 c