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

請問日期的檢查

答題得分者是:RaynorPao
irvinehing
初階會員


發表:77
回覆:79
積分:31
註冊:2003-11-12

發送簡訊給我
#1 引用回覆 回覆 發表時間:2003-11-17 17:26:37 IP:202.174.xxx.xxx 未訂閱
請問如何檢查一個TEdit元件內容是否為有效的日期格式? 發表人 - taishyang 於 2003/11/17 18:39:23
RaynorPao
版主


發表:139
回覆:3622
積分:7025
註冊:2002-08-12

發送簡訊給我
#2 引用回覆 回覆 發表時間:2003-11-17 19:48:41 IP:61.221.xxx.xxx 未訂閱
引言: 請問如何檢查一個TEdit元件內容是否為有效的日期格式?
irvinehing 你好: 請參考以下的做法 < class="code"> TDate date; try { date=StrToDate(Trim(Edit1->Text)); } catch(EConvertError &e) { ShowMessage("Not a valid date"); } 備註: 其他相關函式 StrToTime, StrToDateTime,... -- Enjoy Researching & Developing --
------
-- 若您已經得到滿意的答覆,請適時結案!! --
-- 欲知前世因,今生受者是;欲知來世果,今生做者是 --
-- 一切有為法,如夢幻泡影,如露亦如電,應作如是觀 --
irvinehing
初階會員


發表:77
回覆:79
積分:31
註冊:2003-11-12

發送簡訊給我
#3 引用回覆 回覆 發表時間:2003-11-18 09:55:10 IP:202.174.xxx.xxx 未訂閱
TDate date; try { date = StrToDate(MaskEdit1->Text); } catch(EConvertError &E) { Application->MessageBoxA("Date format error!", "Message", MB_OK); } 我用了以上的code,但是還是出現Error。 Project test.exe raised exception class EConvertError with message ''11/18/03' is not a valid date'. Process stopped. Use Step or Run to continue. 只要我出入dd/mm/yy就正確,mm/dd/yy就會出現錯誤。
irvinehing
初階會員


發表:77
回覆:79
積分:31
註冊:2003-11-12

發送簡訊給我
#4 引用回覆 回覆 發表時間:2003-11-18 10:33:07 IP:202.174.xxx.xxx 未訂閱
我試過將專案編譯成單獨執行檔,卻跑出另一個錯誤,之前的錯誤應該被處理掉了。 Invalid input value. Use escape key to abandon changes. 請問該怎麼辦? 另外,如果要在BCB Run時,不要出現Exception Error,該要怎麼做?
irvinehing
初階會員


發表:77
回覆:79
積分:31
註冊:2003-11-12

發送簡訊給我
#5 引用回覆 回覆 發表時間:2003-11-18 11:06:28 IP:202.174.xxx.xxx 未訂閱
Invalid input value的問題可能出在EditMask上面。 請問我該怎樣設定我的MaskEdit才能讓我輸入"01/01/00"這樣的日期? 我的日期格式為: DateSeparator = '/'; ShortDateFormat = "dd/mm/yy";
irvinehing
初階會員


發表:77
回覆:79
積分:31
註冊:2003-11-12

發送簡訊給我
#6 引用回覆 回覆 發表時間:2003-11-18 11:31:40 IP:202.174.xxx.xxx 未訂閱
感謝n/a發表的文章 http://delphi.ktop.com.tw/topic.php?topic_id=30365 現在輸入格式沒問題了! 另外,要怎樣才能在BCB Run時,不要出現Exception error呢?
RaynorPao
版主


發表:139
回覆:3622
積分:7025
註冊:2002-08-12

發送簡訊給我
#7 引用回覆 回覆 發表時間:2003-11-18 12:29:03 IP:203.73.xxx.xxx 未訂閱
引言: 感謝n/a發表的文章 http://delphi.ktop.com.tw/topic.php?topic_id=30365 現在輸入格式沒問題了! 另外,要怎樣才能在BCB Run時,不要出現Exception error呢?
irvinehing 你好:
(1)你只要在 BCB 外面,直接執行你的 exe 就可以了
(2)在 BCB 的環境裡面執行,會攔截所有的 Exception,你直接按 F9 就可以繼
   續執行
-- Enjoy Researching & Developing --
------
-- 若您已經得到滿意的答覆,請適時結案!! --
-- 欲知前世因,今生受者是;欲知來世果,今生做者是 --
-- 一切有為法,如夢幻泡影,如露亦如電,應作如是觀 --
irvinehing
初階會員


發表:77
回覆:79
積分:31
註冊:2003-11-12

發送簡訊給我
#8 引用回覆 回覆 發表時間:2003-11-18 13:41:33 IP:202.174.xxx.xxx 未訂閱
我是直接按F9來編譯的,但是編譯後會直接執行我的程式,接著但我嘗試輸入錯誤時,Exception Error就會跑出來!< > 當如果我雙擊執行檔執行我的程式,輸入錯誤只會出現我寫的錯誤訊息而已。< >
系統時間:2024-05-16 4:40:31
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!