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

CGauge啟動的時間

答題得分者是:yeeddt
kill42el
一般會員


發表:30
回覆:50
積分:16
註冊:2008-06-04

發送簡訊給我
#1 引用回覆 回覆 發表時間:2008-11-30 23:25:24 IP:59.104.xxx.xxx 訂閱
前輩
想請問一下,在這段程式碼中,有用到 CGauge這元件
但是每次遇到 "找不到資料"時,都先出現提示視窗,CGauge才啟動
能否可以先讓CGauge啟動,再出現提示視窗
[code cpp]
void __fastcall TForm1::BitBtn3Click(TObject *Sender)
{
bool Found ;
ADOTable2->TableName = "基本資料";
ADOTable2->Close();

if(!ADOTable2->Active)
{
ADOTable2->Open();
}

TLocateOptions SearchOptions ;
SearchOptions << loPartialKey ;
Found = ADOTable2->Locate("RFID", Edit8->Text, SearchOptions);
if (Found != true)

ShowMessage("找不到資料") ;

for (int i = CGauge3->MinValue ; i < CGauge3->MaxValue ; i )
{
Sleep(10);
CGauge3->Progress ;
}
CGauge3->Progress = CGauge3->MinValue;
}
[/code]
yeeddt
初階會員


發表:18
回覆:28
積分:29
註冊:2008-11-10

發送簡訊給我
#2 引用回覆 回覆 發表時間:2008-12-01 09:12:06 IP:211.21.xxx.xxx 訂閱
抱歉我不知道CGauge是什麼元件。
不過要Message在元件啟動之後才出現,是不是把ShowMessage放在迴圈下面就可以了?
[code cpp]
for (int i = CGauge3->MinValue ; i < CGauge3->MaxValue ; i )
{
Sleep(10);
CGauge3->Progress ;
}
CGauge3->Progress = CGauge3->MinValue;

if (Found != true)
ShowMessage("找不到資料") ;

}
[/code]
kill42el
一般會員


發表:30
回覆:50
積分:16
註冊:2008-06-04

發送簡訊給我
#3 引用回覆 回覆 發表時間:2008-12-01 11:53:53 IP:123.204.xxx.xxx 訂閱
你好
關於你所說的把ShowMessage放在迴圈下面
這方法早就嘗試過,答案還是一樣
謝謝你的回覆
===================引 用 yeeddt 文 章===================
抱歉我不知道CGauge是什麼元件。
不過要Message在元件啟動之後才出現,是不是就可以了?
[code cpp]
for (int i = CGauge3->MinValue ; i < CGauge3->MaxValue ; i )
{
Sleep(10);
CGauge3->Progress ;
}
CGauge3->Progress = CGauge3->MinValue;

if (Found != true)
ShowMessage("找不到資料") ;

}
[/code]
taishyang
站務副站長


發表:377
回覆:5490
積分:4563
註冊:2002-10-08

發送簡訊給我
#4 引用回覆 回覆 發表時間:2008-12-01 15:27:55 IP:118.169.xxx.xxx 訂閱
我測試是可行的耶,是不是被其他東西影響?

bool Found = false;
void __fastcall TForm1::Button1Click(TObject *Sender)
{
for (int i = CGauge3->MinValue ; i < CGauge3->MaxValue ; i )
{
Sleep(10);
CGauge3->Progress ;
}
CGauge3->Progress = CGauge3->MinValue;

if (Found != true)
ShowMessage("找不到資料") ;
}
kill42el
一般會員


發表:30
回覆:50
積分:16
註冊:2008-06-04

發送簡訊給我
#5 引用回覆 回覆 發表時間:2008-12-06 11:44:22 IP:123.204.xxx.xxx 訂閱
~"~
可能是巴,因為我發現 隨意移動物件擺放的位置,執行後發現
跟原本擺的一模一樣,完全都不能去做任何修改
請問一下是為什麼呢??
Edit->Lock Controls 並沒有鎖定阿
不知道 哪邊錯了??
===================引 用 taishyang 文 章===================
我測試是可行的耶,是不是被其他東西影響?

bool Found = false;
void __fastcall TForm1::Button1Click(TObject *Sender)
{
for (int i = CGauge3->MinValue ; i < CGauge3->MaxValue ; i )
{
Sleep(10);
CGauge3->Progress ;
}
CGauge3->Progress = CGauge3->MinValue;

if (Found != true)
ShowMessage("找不到資料") ;
}
系統時間:2024-04-25 17:41:15
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!