線上訂房服務-台灣趴趴狗聯合訂房中心
發文 回覆 瀏覽次數:1938
推到 Plurk!
推到 Facebook!

讓程式等待n秒後再繼續執行...

答題得分者是:axsoft
khlin
一般會員


發表:9
回覆:22
積分:6
註冊:2003-03-31

發送簡訊給我
#1 引用回覆 回覆 發表時間:2003-04-22 10:47:51 IP:192.192.xxx.xxx 未訂閱
請問...我在BCB中可否讓程式...執行到某一行後等待n秒後再繼續執行... 有點像VB中wait()或delay()的功能........
axsoft
版主


發表:681
回覆:1056
積分:969
註冊:2002-03-13

發送簡訊給我
#2 引用回覆 回覆 發表時間:2003-04-22 10:54:52 IP:61.218.xxx.xxx 未訂閱
引言: 請問...我在BCB中可否讓程式...執行到某一行後等待n秒後再繼續執行... 有點像VB中wait()或delay()的功能........
khlin : 用Sleep(n)試試! 聯盟----Visita網站http://www.vista.org.tw ---[ 發問前請先找找舊文章 ]---
khlin
一般會員


發表:9
回覆:22
積分:6
註冊:2003-03-31

發送簡訊給我
#3 引用回覆 回覆 發表時間:2003-04-22 11:49:57 IP:192.192.xxx.xxx 未訂閱
不行耶! 像以下程式..我在Form上看不到停頓的效果....... 反而是程式都run完了......再反應... //網路卡安裝與設定 Sleep(2000); Label1->Font->Color=clYellow; Sleep(2000); Label1->Font->Color=clGreen; //預設閘道連線 Sleep(2000); Label2->Font->Color=clYellow; Sleep(2000); Label2->Font->Color=clGreen; //外部主機連線 Sleep(2000); Label3->Font->Color=clYellow; Sleep(2000); Label3->Font->Color=clGreen; //DNS診斷 Sleep(2000); Label4->Font->Color=clYellow; Sleep(2000); Label4->Font->Color=clGreen; //PROXY代理伺服器 Sleep(2000); Label5->Font->Color=clYellow; Sleep(2000); Label5->Font->Color=clGreen;
axsoft
版主


發表:681
回覆:1056
積分:969
註冊:2002-03-13

發送簡訊給我
#4 引用回覆 回覆 發表時間:2003-04-22 12:40:14 IP:61.218.xxx.xxx 未訂閱
引言: 不行耶! 像以下程式..我在Form上看不到停頓的效果....... 反而是程式都run完了......再反應... //網路卡安裝與設定 Sleep(2000); Label1->Font->Color=clYellow; Sleep(2000); Label1->Font->Color=clGreen; //預設閘道連線 Sleep(2000); Label2->Font->Color=clYellow; Sleep(2000); Label2->Font->Color=clGreen; //外部主機連線 Sleep(2000); Label3->Font->Color=clYellow; Sleep(2000); Label3->Font->Color=clGreen; //DNS診斷 Sleep(2000); Label4->Font->Color=clYellow; Sleep(2000); Label4->Font->Color=clGreen; //PROXY代理伺服器 Sleep(2000); Label5->Font->Color=clYellow; Sleep(2000); Label5->Font->Color=clGreen;
您試試把Sleep後面加上Application->ProcessMessages(); 聯盟----Visita網站http://www.vista.org.tw ---[ 發問前請先找找舊文章 ]---
khlin
一般會員


發表:9
回覆:22
積分:6
註冊:2003-03-31

發送簡訊給我
#5 引用回覆 回覆 發表時間:2003-04-22 13:36:03 IP:192.192.xxx.xxx 未訂閱
axsoft 您太神奇了.................. 可以了耶.... 可否請教您.......這是為什麼呢? 有什麼觀念嗎?
brant
一般會員


發表:1
回覆:64
積分:23
註冊:2003-04-07

發送簡訊給我
#6 引用回覆 回覆 發表時間:2003-04-22 14:39:43 IP:61.219.xxx.xxx 未訂閱
引言: axsoft 您太神奇了.................. 可以了耶.... 可否請教您.......這是為什麼呢? 有什麼觀念嗎?
改變 label 的屬性 (大部份 windows 物件亦是) 是用 send message 的方式通知該物件 等物件自行處理該 message 來修改物件內部的資料 算是資料封裝跟訊息驅動兩種觀念的結合吧!
axsoft
版主


發表:681
回覆:1056
積分:969
註冊:2002-03-13

發送簡訊給我
#7 引用回覆 回覆 發表時間:2003-04-22 14:50:01 IP:61.218.xxx.xxx 未訂閱
引言: axsoft 您太神奇了.................. 可以了耶.... 可否請教您.......這是為什麼呢? 有什麼觀念嗎?
Call ProcessMessages to permit Windows to process these messages that are currently in the message queue. ProcessMessages cycles the Windows message loop until it is empty and then returns control to the application. Note: Neglecting message processing affects only the application calling ProcessMessages, not other applications. In lengthy operations, calling ProcessMessages periodically allows the application to respond to paint and other messages. Note: ProcessMessages does not allow the application to go idle, whereas HandleMessage does. 聯盟----Visita網站http://www.vista.org.tw ---[ 發問前請先找找舊文章 ]---
系統時間:2024-05-02 9:29:58
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!