请问:try...except(50分)

  • 主题发起人 主题发起人 monkeyking1983
  • 开始时间 开始时间
M

monkeyking1983

Unregistered / Unconfirmed
GUEST, unregistred user!
我想通过下面的方式检测用户输入的日期格式是否正确,但是程序会直接抛出异常,然后挂了,不会出现我想要消息提示,请问这是为何,我哪里写错了!
try
Userset := StrToDate(Edit1.Text);
except
ShowMessage('Not a DateTime Format');
end;
//如果正确,就显示用户设置的日期
ShowMessage(DateToStr(UserSetDateTime));
 
應該不是挂了,而是暫停了.
你執行時是什麼模式呀?
把tools-->debut ???中的integrated debugging選項不勾選試試.
 
//如果正确,就显示用户设置的日期
ShowMessage(DateToStr(UserSetDateTime))


这句不管格式是否正确,都会执行,会出问题的,还有你的变量名称对不对?这里是UserSetDateTime,前面是UserSet
 
谢谢楼上的解答,问题解决了。请问,关于这个问题,你可以在深入的给我讲解一下么。
比如这两种编译方式在try...except上的差别。分不够。我再加。
 
分不成問題,但我不知道你是說哪位幫你解決了?
兩種方式的區別你試試就知道了.

多思考,多動手就行了.
 
这不是错误,是调试信息。

 
晕,没有想到黑星星的手脚比我快,呵呵。我本来是想跟011101的。
那个变量名是我输入的时候弄错了。不好意思。
 
integrated debugging
有錯誤或斷點就會停......太多了.
 
谢谢各位!结帖了!
 
后退
顶部