請問關於MessageBox中,Help按鍵的使用方法?? |
尚未結案
|
tglego
一般會員 發表:11 回覆:14 積分:5 註冊:2004-06-02 發送簡訊給我 |
|
jest0024
高階會員 發表:11 回覆:310 積分:224 註冊:2002-11-24 發送簡訊給我 |
|
tglego
一般會員 發表:11 回覆:14 積分:5 註冊:2004-06-02 發送簡訊給我 |
|
deity
尊榮會員 發表:90 回覆:876 積分:678 註冊:2003-05-09 發送簡訊給我 |
引言: 抱歉!!可以說的詳細一點嗎?? 我現在有一個訊息: MessageBox(NULL,"氣壓不正常","工作視窗",MB_YESNO MB_HELP); 我希望按下"Help"後,可以出現一個Form,讓我能列出一些針對此訊息的處理辦法!!!那要在此MessageBox的前後怎麼寫呢?? tglego您好: procedure TForm1.Button1Click(Sender: TObject); begin if APPlication.MessageBox('氣壓不正常','工作視窗',MB_YESNO MB_HELP)=IDYes then showmessage('Yes'); end; function TForm1.FormHelp(Command: Word; Data: Integer; var CallHelp: Boolean): Boolean; begin Form2.Show; end; 这是不是您所要 > <> =============================== 为什么经过多年以后,得失的过程如此冷漠 =============================== > |
tglego
一般會員 發表:11 回覆:14 積分:5 註冊:2004-06-02 發送簡訊給我 |
本站聲明 |
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇! |