全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:1054
推到 Plurk!
推到 Facebook!

exception的疑问

答題得分者是:st33chen
zhouying82
高階會員


發表:150
回覆:272
積分:189
註冊:2004-03-16

發送簡訊給我
#1 引用回覆 回覆 發表時間:2009-01-16 12:56:21 IP:218.80.xxx.xxx 訂閱

[code delphi]
真的搞不懂这2个代码有什么区别?
代码1:
EFileOpenError=class(Exception)
end;
.....
try
FileOpenDialog.Execute;
except
on E:Exception do begin
raise EFileOpenError.Create('请升级到VISTA以上版本');
end;
end;
end.

代码2:
。。。。。
try
FileOpenDialog.Execute;
except
showmessage('请升级到VISTA以上版本');
end;
end.
以上的2各代码具体有什么区别呢?我在使用过程中好像没有碰到过问题吗,都是执行一样的结果。
[/code]
------
断断续续的学了几年,还是一个初学者,永远支持Delphi !
st33chen
尊榮會員


發表:15
回覆:591
積分:1201
註冊:2005-09-30

發送簡訊給我
#2 引用回覆 回覆 發表時間:2009-01-16 16:32:16 IP:122.116.xxx.xxx 未訂閱
您好,
我認為, 用 exception 物件還可以顯示其他資訊給使用者, 例如

try
FileOpenDialog.Execute;
except
on E:Exception do begin
raise EFileOpenError.Create('請升級到VISTA以上版本' #13#10 '錯誤原因: ' e.message);
end;
end;

如果像您的例子, 只 show 固定字串給使用者, 那可以不用 e:exception 這個方法.
參考一下.




------
IS IT WHAT IT IS
我是 李慕白 請倒著唸.
又想把老話拿出來說, 請用台語發音 : 專家專家全是ROBOT CAR (滷肉腳啦);
都已接手這麼久了, 績效還是那麼爛, 講話還那麼大聲.
zhouying82
高階會員


發表:150
回覆:272
積分:189
註冊:2004-03-16

發送簡訊給我
#3 引用回覆 回覆 發表時間:2009-01-16 16:36:18 IP:218.80.xxx.xxx 訂閱
楼上的大大,那么效率方面,是那个更好一点呢?
------
断断续续的学了几年,还是一个初学者,永远支持Delphi !
st33chen
尊榮會員


發表:15
回覆:591
積分:1201
註冊:2005-09-30

發送簡訊給我
#4 引用回覆 回覆 發表時間:2009-01-16 16:57:01 IP:122.116.xxx.xxx 未訂閱
===================引 用 zhouying82 文 章===================
楼上的大大,那么效率方面,是那个更好一点呢?

這個問題對我來說很難也.
其實我都是用
try
...
except
on e:exception do begin
showmessage(...);
end;
end;
方式做,
我判斷, 即使有效率差異, 應該還不致於被人發覺吧.
何況, 一 showmessage 就會停下來等使用者回應, 效率差異不會累積.
ha ha, 算我不求甚解吧. 我沒有實測數据.
------
IS IT WHAT IT IS
我是 李慕白 請倒著唸.
又想把老話拿出來說, 請用台語發音 : 專家專家全是ROBOT CAR (滷肉腳啦);
都已接手這麼久了, 績效還是那麼爛, 講話還那麼大聲.
編輯記錄
st33chen 重新編輯於 2009-01-16 17:15:14, 註解 無‧
zhouying82
高階會員


發表:150
回覆:272
積分:189
註冊:2004-03-16

發送簡訊給我
#5 引用回覆 回覆 發表時間:2009-01-16 17:15:37 IP:218.80.xxx.xxx 訂閱
那么既然都用showmessage,为什么你还要用e:exception do begin 呢
------
断断续续的学了几年,还是一个初学者,永远支持Delphi !
st33chen
尊榮會員


發表:15
回覆:591
積分:1201
註冊:2005-09-30

發送簡訊給我
#6 引用回覆 回覆 發表時間:2009-01-17 11:05:53 IP:122.116.xxx.xxx 未訂閱
修正一下
其實我都是用
try
...
except
on e:exception do begin
showmessage(e.message);
end;
end;
方式做,
所以才會用 exception 物件.
------
IS IT WHAT IT IS
我是 李慕白 請倒著唸.
又想把老話拿出來說, 請用台語發音 : 專家專家全是ROBOT CAR (滷肉腳啦);
都已接手這麼久了, 績效還是那麼爛, 講話還那麼大聲.
pprayer
高階會員


發表:35
回覆:185
積分:174
註冊:2002-03-13

發送簡訊給我
#7 引用回覆 回覆 發表時間:2009-01-17 12:28:35 IP:61.63.xxx.xxx 訂閱


[code delphi]
//程序中斷並跳回主程式 看不到test訊息
try
FileOpenDialog.Execute;
except
on E:Exception do begin
raise EFileOpenError.Create('请升级到VISTA以上版本');
end;
end;
showmessage('test');
end.


//程序繼續 test訊息會跳出
try
FileOpenDialog.Execute;
except
showmessage('请升级到VISTA以上版本');
end;
showmessage('test');
end.

[/code]
編輯記錄
pprayer 重新編輯於 2009-01-17 12:30:47, 註解 無‧
系統時間:2024-05-04 18:50:41
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!