progressbar的問題

發文回覆瀏覽次數：1411

推到 Plurk!

推到 Facebook!

b1589delphi
一般會員

發表：3
回覆：1
積分：0
註冊：2006-07-10

發送簡訊給我

#1 引用回覆回覆

發表時間：2006-07-26 10:52:03

IP:163.16.xxx.xxx 未訂閱

請問如何利用一個事件停止progressbar的進行,或利用一個button???
再問一個問題,Application->ProcessMessages();在progressbar中如何利用???
謝謝大大

RaynorPao
版主

發表：139
回覆：3622
積分：7025
註冊：2002-08-12

發送簡訊給我

#2 引用回覆回覆

發表時間：2006-07-26 15:30:28

IP:202.3.xxx.xxx 未訂閱

請參考以下的範例自行修改

bool bAction=false;
void __fastcall TForm1::Button1Click(TObject *Sender)
{
bAction=!bAction;
ProgressBar1->Position=0;
for(int i=0; i<10000; i )
{
Application->ProcessMessages();
if(!bAction)
{
break;
}
Sleep(10);
ProgressBar1->Position=(int)((double)(i 1)/(double)10000*100);
}
}

------
-- 若您已經得到滿意的答覆，請適時結案!! --
-- 欲知前世因，今生受者是；欲知來世果，今生做者是 --
-- 一切有為法，如夢幻泡影，如露亦如電，應作如是觀 --

系統時間：2024-11-25 17:52:31

聯絡我們 | Delphi K.Top討論版

本站聲明

1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！