請教MessageBox問題 |
答題得分者是:ha0009
|
cashxin2002
版主 發表:231 回覆:2555 積分:1937 註冊:2003-03-28 發送簡訊給我 |
請教ha0009版主及各位前輩﹒ 在ha0009版主的Code中﹐有如下一段程式碼﹕
if Application.MessageBox(PChar(format('公事包有%d筆變動資料﹐是否同步到資料庫﹖',[ADODataSet2.RecordCount])),'資料異動',MB_YESNO)=IDYES then ... 請教版主及前輩﹐其中的PChar(format...)是何意義﹖%d是代表后面的[ADODataSet2.RecordCount]數值嗎﹖感恩中﹒﹒﹒ 勞煩賜教﹗謝謝﹗ 努力,相信會獲得美麗!
忻晟
------
忻晟 |
ha0009
版主 發表:16 回覆:507 積分:639 註冊:2002-03-16 發送簡訊給我 |
你好:
1. format 是一個格式化字串的函式, 在組合字串時非常好用(我的習慣^^), 其中 %d 代表要以整數值取代,其他參數就請你查查 Help 囉 ^^ 2. MessageBox 是Windows 的對話視窗,原型如下 function MessageBox(const Text, Caption: PChar; Flags: Longint = MB_OK): Integer; PChar 是將 Format 傳出的字串轉換為 PChar 字串,也就是以 Chr(0) 為結尾的字串。你很努力喔,給你拍拍手給你鼓鼓掌,加油喔。 PS : 以上知識由 Help 都可獲得喔,別忽略了身邊最實用的工具喔 |
cashxin2002
版主 發表:231 回覆:2555 積分:1937 註冊:2003-03-28 發送簡訊給我 |
|
ha0009
版主 發表:16 回覆:507 積分:639 註冊:2002-03-16 發送簡訊給我 |
你好:
呵呵.. 記住一句話,天下無難事,天助自助。
別以為豬的英文有多好,他還是靠Dr.Eye 才看的
懂呢^^"
1. function Format(const Format: string; const Args: array of const): string; Format : 想要傳回的字串格式。 Args : 格式字串內所需的參數,array of const 是一個 Variant 的動態陣列。 result : 傳回轉換後的字串。 置換符號有很多,我列幾個常用的你參考看看。 %d 整數。 %f 浮點數。 %s 字串。 5x 整數轉為 16 進位輸出。 Ex: format ('%s 你好,您是第 %d 個光臨的客人。', ['沉默羔羊', 5]); 上面的函式會傳回 沉默羔羊 你好,您是第 5 個光臨的客人。 2. function MessageBox(const Text, Caption: PChar; Flags: Longint = MB_OK): Integer; Text : 對話視窗中的文字。 Caption : 對話視窗左上角的文字。 Flags : 對話框可使用按鈕種類 MB_ABORTRETRYIGNORE 放棄 重試 忽略 MB_OK The 確定 MB_OKCANCEL : 確定 放棄 MB_RETRYCANCEL : 重試 放棄 MB_YESNO : 是 否 MB_YESNOCANCEL : 是 否 放棄 result : 傳回使用者的案件選擇 IDOK IDCANCEL IDABORT IDRETRY IDIGNORE IDYES IDNO希望以上的說明部會讓你頭昏腦脹,有些東西很難翻。如果不了解,開個新專案測試看看最準。 |
cashxin2002
版主 發表:231 回覆:2555 積分:1937 註冊:2003-03-28 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |