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

Не поймать исключение   Найти похожие ветки 

← →
INTAARI ©   (2003-06-27 13:24) [0]

Привет коллеги!!!
У меня возникла такая ситуация. Я использую для работы с СОМ портом Async Professional 4.06. В компоненте ТAPDDataPecket нужно поймать исключение EConvertError. Он ловит свое внутренее EVariantError до моего не доходит


procedure TForm1.Wind_PackStringPacket(Sender: TObject;
Data: String);
var
i:integer;
begin
try
Speed:=strtofloat(copy(Data,1,Pos(",",Data)-1));
except
on EconvertError do
Speed:=0;
end;

.......

end;


---

← →
Digitman ©   (2003-06-27 13:32) [1]

> до моего не доходит


значит, оно не возникает.
попросту до этого дело не доходит.

иначе данная попытка преобразования в ходе выполнения при недопустимых к преобразованию данных в строке однозначно привела бы к EconvertError, которое у тебя вполне корректно перехватывается в блоке except

---

← →
INTAARI ©   (2003-06-27 13:47) [2]

Я пытаюсь преднамеренно вызвать исключение копируя из строки "R,6.7", чтобы под преобразование попалось "R,6.7", а он не хочет.

---

← →
Digitman ©   (2003-06-27 13:52) [3]

ты что-нибудь слышал про отладочные точки останова и пошаговую трассировку программы под управлением встроенного в Делфи отладчика ?

---

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

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



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