Скачать: CL | DM;

Exceptions Type to Ignore не работает   Найти похожие ветки 

← →
pasha_golub ©   (2010-04-21 12:02) [0]

Есть у меня класс

EMyException = class(EAbort)

внутре кода, он иногда выстреливает. Хочу чтобы дебаггер не останавливался на этой строчке. По идее он и так не должен, ибо стоит галочка напротив VCL EAbort Exceptions.

Добавил вручную EMyException, запускаю. Дохожу до места предполагаемой отладки, жму F8 (Step Over), там внутре возбуждается EMyException и гасится, но редактор подсвечивает мне место обработки этого исключения:

 except
   Result := CheckError;
 end;

Чего ему надобно? Если запускаю просто на исполнение (без Step Over), то не останавливается.

---

← →
pasha_golub ©   (2010-04-21 12:19) [1]

type
  EMyException = class(Exception);

procedure LowLevel;
begin
raise EMyException.Create("Low Level");
end;

function CheckLowLevel: boolean;
begin
try
 LowLevel();
 Result := True;
except
 result := False; // <------ А здесь блин оказываемся
end;
end;

procedure TForm1.Button2Click(Sender: TObject);
begin
if CheckLowLevel then //<----- здесь жмакаем F8
  ShowMessage("FooBar");
end;


Так вот

---

← →
pasha_golub ©   (2010-04-21 12:22) [2]

И даже если так, то не работает:

procedure LowLevel;
begin
raise EABort.Create("Low Level");
end;

---

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

Скачать: CL | DM;



Память: 0.45 MB
Время: -0.996 c