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

messageDlg 無法秀中文

答題得分者是:hagar
K1086
初階會員


發表:63
回覆:148
積分:42
註冊:2007-04-09

發送簡訊給我
#1 引用回覆 回覆 發表時間:2007-04-09 15:29:22 IP:220.131.xxx.xxx 訂閱
if MessageDlg('確定刪除這筆資料?',mtConfirmation, [mbYes, mbNo], 0)=
mrNo then
abort;
請問各位 仙輩 使用上述語法 秀出的還是英文 delete Record ? 要如何修正??
謝謝囉!!!
hagar
版主


發表:143
回覆:4056
積分:4445
註冊:2002-04-14

發送簡訊給我
#2 引用回覆 回覆 發表時間:2007-04-09 16:16:27 IP:210.242.xxx.xxx 未訂閱
看樣子不是 MessageDlg 不能顯示中文
而是您的程式實際上未執行到這個 if 判斷式
K1086
初階會員


發表:63
回覆:148
積分:42
註冊:2007-04-09

發送簡訊給我
#3 引用回覆 回覆 發表時間:2007-04-09 16:38:44 IP:220.131.xxx.xxx 訂閱

===================引 用 文 章===================
看樣子不是 MessageDlg 不能顯示中文
而是您的程式實際上未執行到這個 if 判斷式
======>>>謝謝您的回覆
我是用 Table1BeforeDelete 事件 如下判斷的 請看有錯誤嗎?
if MessageDlg('確定刪除這筆資料?',mtConfirmation, [mbYes, mbNo], 0)=
mrNo then
abort;
※ 請問是否有某些地方要設定?

K1086
初階會員


發表:63
回覆:148
積分:42
註冊:2007-04-09

發送簡訊給我
#4 引用回覆 回覆 發表時間:2007-04-09 16:52:10 IP:220.131.xxx.xxx 訂閱
======>>>謝謝您的回覆 我是用 Table1BeforeDelete 事件 如下判斷的 請看有錯誤嗎? if MessageDlg('確定刪除這筆資料?',mtConfirmation, [mbYes, mbNo], 0)= mrNo then abort; ※ 請問是否有某些地方要設定?
hagar
版主


發表:143
回覆:4056
積分:4445
註冊:2002-04-14

發送簡訊給我
#5 引用回覆 回覆 發表時間:2007-04-09 18:04:05 IP:210.242.xxx.xxx 未訂閱
是不是用使用 TDBNavigator 元件?
有的話, 將 TDBNavigator.ConfirmDelete 屬性設為 False 後再試試
syntax
尊榮會員


發表:26
回覆:1139
積分:1258
註冊:2002-04-23

發送簡訊給我
#6 引用回覆 回覆 發表時間:2007-04-10 01:00:56 IP:61.64.xxx.xxx 訂閱
第一次看到 Delphi 會幫人翻譯的事件,還滿稀奇的

===================引 用 文 章===================
if MessageDlg('確定刪除這筆資料?',mtConfirmation, [mbYes, mbNo], 0)=
mrNo then
abort;
請問各位 仙輩 使用上述語法 秀出的還是英文 delete Record ? 要如何修正??
謝謝囉!!!
K1086
初階會員


發表:63
回覆:148
積分:42
註冊:2007-04-09

發送簡訊給我
#7 引用回覆 回覆 發表時間:2007-04-10 11:12:07 IP:220.131.xxx.xxx 訂閱

===================引 用 文 章===================
是不是用使用 TDBNavigator 元件?
有的話, 將 TDBNavigator.ConfirmDelete 屬性設為 False 後再試試
======>>>
謝謝版主回覆問題
我是使用TDBNavigator 元件 但是如您所說 屬性設為 False ,那TDBNavigator 元件 上就看不到 [刪除] 如何點選測試呢?? 請幫忙想個辦法解決 Tks'
======>>>
hagar
版主


發表:143
回覆:4056
積分:4445
註冊:2002-04-14

發送簡訊給我
#8 引用回覆 回覆 發表時間:2007-04-10 17:46:42 IP:210.242.xxx.xxx 未訂閱
小弟將 ConfirmDelete 屬性設為 False 並不會造成 "Delete" 的按鈕消失
檢查一下 TDBNavigator 的 VisibleButtons 屬性的 nbDelete 是不是被設為 False 了?
K1086
初階會員


發表:63
回覆:148
積分:42
註冊:2007-04-09

發送簡訊給我
#9 引用回覆 回覆 發表時間:2007-04-11 16:48:22 IP:220.131.xxx.xxx 訂閱
======>>>>
請問 TDBNavigator.ConfirmDelete屬性設為 False 是要在TDBNavigator Events 的
事件中加入嗎?? 還是.... 請麻煩舉例一完整程式段 好嗎??

K1086
初階會員


發表:63
回覆:148
積分:42
註冊:2007-04-09

發送簡訊給我
#10 引用回覆 回覆 發表時間:2007-04-11 16:52:46 IP:220.131.xxx.xxx 訂閱
TDBNavigator 的 VisibleButtons 屬性的 nbDelete  我是有檢查 是正確的
但還是無法秀出中文 好像是跟本就沒有那判斷段程式存在
hagar
版主


發表:143
回覆:4056
積分:4445
註冊:2002-04-14

發送簡訊給我
#11 引用回覆 回覆 發表時間:2007-04-11 18:44:06 IP:210.242.xxx.xxx 未訂閱
還是可否上傳您的式來看看?
K1086
初階會員


發表:63
回覆:148
積分:42
註冊:2007-04-09

發送簡訊給我
#12 引用回覆 回覆 發表時間:2007-04-11 20:03:02 IP:220.131.xxx.xxx 訂閱

procedure TTwn_DayFm1.Table1BeforeDelete(DataSet: TDataSet);
begin
if MessageDlg('確定刪除這筆資料?',mtConfirmation, [mbYes, mbNo], 0)=
mrNo then
abort;
end;
就是如此 請版主幫忙
K1086
初階會員


發表:63
回覆:148
積分:42
註冊:2007-04-09

發送簡訊給我
#13 引用回覆 回覆 發表時間:2007-04-11 21:35:03 IP:220.131.xxx.xxx 訂閱
謝版主 提示 問題出在 元件損壞 重新安裝元件 即ok 謝了
系統時間:2024-11-23 13:36:52
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!