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

如何讓ShowMessage最上層顯示

答題得分者是:shaofu
tony115722
一般會員


發表:53
回覆:63
積分:23
註冊:2002-07-09

發送簡訊給我
#1 引用回覆 回覆 發表時間:2003-07-16 14:13:15 IP:210.63.xxx.xxx 未訂閱
利用 timer 每秒執行 ShowMessage('abc'); 試過將 Form1.FormStyle:=fsStayOnTop; 但是當 ShowMessage連續執行時, Message就會被壓在 Form1 後面,點也點不到 請問有什麼方法可以讓每個Message都在最上層顯示?? I like DeBug
------
I like DeBug
ha0009
版主


發表:16
回覆:507
積分:639
註冊:2002-03-16

發送簡訊給我
#2 引用回覆 回覆 發表時間:2003-07-16 14:21:11 IP:61.30.xxx.xxx 未訂閱
你好: 你可以使用 application.MessageBox('abc', '', MB_SYSTEMMODAL); 取代 ShowMessage ('abc'); < src="http://sourceprovide.deepen.com.tw/K_Top/bp.gif">
shaofu
高階會員


發表:5
回覆:136
積分:103
註冊:2003-01-07

發送簡訊給我
#3 引用回覆 回覆 發表時間:2003-07-16 14:32:20 IP:210.243.xxx.xxx 未訂閱
引言: 利用 timer 每秒執行 ShowMessage('abc'); 試過將 Form1.FormStyle:=fsStayOnTop; 但是當 ShowMessage連續執行時, Message就會被壓在 Form1 後面,點也點不到 請問有什麼方法可以讓每個Message都在最上層顯示?? I like DeBug
你應該是用 XP 吧? 這個問題, Borland 的 TeamB 說是 XP 的 Bug (或說 XP 的 rule 改了), 後來我是改用 Windows.MessageBox 才解決這個問題... 蠻討厭的一個問題
tony115722
一般會員


發表:53
回覆:63
積分:23
註冊:2002-07-09

發送簡訊給我
#4 引用回覆 回覆 發表時間:2003-07-16 14:36:01 IP:210.63.xxx.xxx 未訂閱
我是用98耶 I like DeBug
------
I like DeBug
tony115722
一般會員


發表:53
回覆:63
積分:23
註冊:2002-07-09

發送簡訊給我
#5 引用回覆 回覆 發表時間:2003-07-16 14:39:14 IP:210.63.xxx.xxx 未訂閱
SORRY...我試過了..還是會在Form後面耶 I like DeBug
------
I like DeBug
shaofu
高階會員


發表:5
回覆:136
積分:103
註冊:2003-01-07

發送簡訊給我
#6 引用回覆 回覆 發表時間:2003-07-16 14:40:20 IP:210.243.xxx.xxx 未訂閱
引言: 我是用98耶
疑? 不過我在 Win2000 下試不會有這樣的問題.. 那你就先用 ha0009 版主的方法試看看好了
tony115722
一般會員


發表:53
回覆:63
積分:23
註冊:2002-07-09

發送簡訊給我
#7 引用回覆 回覆 發表時間:2003-07-16 14:51:22 IP:210.63.xxx.xxx 未訂閱
使用 Windows.MessageBox 是可以解決,不過,會有很多視窗耶,能不能只有一個視窗呢?? Application.MessageBox是只有一個視窗,不過卻還是在 Form後面耶 謝謝. I like DeBug
------
I like DeBug
ha0009
版主


發表:16
回覆:507
積分:639
註冊:2002-03-16

發送簡訊給我
#8 引用回覆 回覆 發表時間:2003-07-16 14:59:28 IP:61.30.xxx.xxx 未訂閱
你好: 你的需求蠻奇怪的可以請問你為何要每秒執行 > > < src="http://sourceprovide.deepen.com.tw/K_Top/bp.gif">
shaofu
高階會員


發表:5
回覆:136
積分:103
註冊:2003-01-07

發送簡訊給我
#9 引用回覆 回覆 發表時間:2003-07-16 15:04:25 IP:210.243.xxx.xxx 未訂閱
引言: 使用 Windows.MessageBox 是可以解決,不過,會有很多視窗耶,能不能只有一個視窗呢?? Application.MessageBox是只有一個視窗,不過卻還是在 Form後面耶 謝謝. I like DeBug
唔.. 那是你的 code 就可以決定的事啊, 提供兩個作法: 1. 加 flag 判斷
procedure TForm1.Timer1Timer(Sender: TObject);
begin
  if not bShow then
  begin
    ShowMessage('Hello');
    bShow := True;
  end;
end;
2. 把 Timer 關掉..
procedure TForm1.Timer1Timer(Sender: TObject);
begin
  ShowMessage('Hello');
  Timer1.Enabled := False;
end;
以上那個方法好(或其他方法), 則還是要看你的程式決定 > 發表人 -
系統時間:2024-04-30 1:56:35
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!