if (edit1.Text <> '') then
try
begin
showMessage(dateToStr(strToDate(edit1.Text)));
end;
except
// on EconvertError do
showMessage('EconvertError');
// else
// showMessage('otherError');
end;
按照书上说明,在try段出现异常的话,应该转入except段执行,但是我的为什么不可以?我想把
edit1中的内容转成时间格式,如果出现格式类型不对的异常就showMessage('EconvertError');
但是结果不是我想要的那样,如果出现输入类型非yyyy-mm-dd的格式程序就直接终止,提示'EconvertError'异常,我想把异常拦截下来,不让程序终止,而是提示输入正确格式。在下初学delphi,请多包涵,ps:我搜索过,但是没找到结果。
try
begin
showMessage(dateToStr(strToDate(edit1.Text)));
end;
except
// on EconvertError do
showMessage('EconvertError');
// else
// showMessage('otherError');
end;
按照书上说明,在try段出现异常的话,应该转入except段执行,但是我的为什么不可以?我想把
edit1中的内容转成时间格式,如果出现格式类型不对的异常就showMessage('EconvertError');
但是结果不是我想要的那样,如果出现输入类型非yyyy-mm-dd的格式程序就直接终止,提示'EconvertError'异常,我想把异常拦截下来,不让程序终止,而是提示输入正确格式。在下初学delphi,请多包涵,ps:我搜索过,但是没找到结果。
所以要想看到它最终异常处理的结果,直接运行exe程序就可以了
Stop on Delphi Exception前面的勾去掉