| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Не ловится исключение [D7, WinXP]

tonick2001 ©   (2008-10-20 14:11:00) 

procedure TForm1.Edit1Exit(Sender: TObject);
var i1,i2:integer;
 begin

   if edit2.text='' then edit2.text:='0';
   try
   i1:=strtoint(edit1.Text);
   i2:=strtoint(edit2.Text);
   except
       on EConvertError do
       label1.Caption:='Введите цифру';
   else label1.Caption:=edit2.Text;
   end;
   if i1>i2 then label1.Caption:=edit1.text
   else label1.Caption:=edit2.Text;

Исключение не ловится. программа вываливается... что не так???

---

Сергей М.   (2008-10-21 20:23:00) [1]

Малацца.
Отнынеп тебе присваивается почетный титул неловца ловимых исключений.

---

Tonick2001   (2008-10-21 20:16:00) [2]

> Tools -> Debugger Options -> Language Exceptions -> Снять
> галку Stop on Delphi Exceptions.

Спасибо... Я уже нашёл это ))))

---

Ega23   (2008-10-20 15:53:00) [3]

> все разобрался уже.. Просто когда запускаешь в отладчике
> косячит, а непосредственно в exe все работает..


Tools -> Debugger Options -> Language Exceptions -> Снять галку Stop on Delphi Exceptions.

Но учти, это палка о двух концах.

---

www   (2008-10-20 15:50:00) [4]

edit2.text:=IntToStr(StrToIntSafe(Trim(edit2.text)))
всего-то

---

Palladin   (2008-10-20 14:47:00) [5]

^)

---

Сергей М.   (2008-10-20 14:27:00) [6]

> Просто когда запускаешь в отладчике косячит


Ничего там не "косячит"

---

tonick2001   (2008-10-20 14:25:00) [7]

все разобрался уже.. Просто когда запускаешь в отладчике косячит, а непосредственно в exe все работает..

---

Сергей М.   (2008-10-20 14:14:00) [8]

Исключения в этомфрагменте кода нет, видимо потому и не ловится.

---

Наверх