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

Logo畫面會停住

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


發表:5
回覆:7
積分:2
註冊:2003-08-15

發送簡訊給我
#1 引用回覆 回覆 發表時間:2003-08-16 00:21:31 IP:163.28.xxx.xxx 未訂閱
// ------------- lanfanra 您好: 我弄了一個範例你試試! 下載:http://delphi.ktop.com.tw/loadfile.php?TOPICID=11139996&CC=249144 //----------------------------- 你好: 我根據你的程式完全一模一樣的照抄, 可是我的TIMER1好像不會動,想請教是為什麼? 我試很久了,我的FORM2就是關不起來。
RaynorPao
版主


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

發送簡訊給我
#2 引用回覆 回覆 發表時間:2003-08-16 00:33:30 IP:61.221.xxx.xxx 未訂閱
引言: // ------------- lanfanra 您好: 我弄了一個範例你試試! 下載:http://delphi.ktop.com.tw/loadfile.php?TOPICID=11139996&CC=249144 //----------------------------- 你好: 我根據你的程式完全一模一樣的照抄, 可是我的TIMER1好像不會動,想請教是為什麼? 我試很久了,我的FORM2就是關不起來。
drew 你好:
(1)Timer1 的 Enabled 屬性有沒有設為 true 呢??
(2)請 check Logo.cpp, Unit1.cpp, Unit2.cpp 這三個檔案的內容
-- Enjoy Researching & Developing -- 發表人 - RaynorPao 於 2003/08/16 00:43:28
------
-- 若您已經得到滿意的答覆,請適時結案!! --
-- 欲知前世因,今生受者是;欲知來世果,今生做者是 --
-- 一切有為法,如夢幻泡影,如露亦如電,應作如是觀 --
drew
一般會員


發表:5
回覆:7
積分:2
註冊:2003-08-15

發送簡訊給我
#3 引用回覆 回覆 發表時間:2003-08-16 10:11:07 IP:163.28.xxx.xxx 未訂閱
引言: ------------------------------------------------------------ drew 你好: (1)Timer1 的 Enabled 屬性有沒有設為 true 呢?? (2)請 check Logo.cpp, Unit1.cpp, Unit2.cpp 這三個檔案的內容 ------------------------------------------------------------ RaynorPao你好: 感謝你的回覆。 我在之前就有check過了,就是沒有不同的地方。 可是我的Timer1就是不會動,必須要手動關掉Form2。 請問需要附上原始檔呢? 謝謝你
axsoft
版主


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

發送簡訊給我
#4 引用回覆 回覆 發表時間:2003-08-17 16:12:15 IP:211.76.xxx.xxx 未訂閱
引言: 引言: ------------------------------------------------------------ drew 你好: (1)Timer1 的 Enabled 屬性有沒有設為 true 呢?? (2)請 check Logo.cpp, Unit1.cpp, Unit2.cpp 這三個檔案的內容 ------------------------------------------------------------ RaynorPao你好: 感謝你的回覆。 我在之前就有check過了,就是沒有不同的地方。 可是我的Timer1就是不會動,必須要手動關掉Form2。 請問需要附上原始檔呢? 謝謝你
drew 你好: 不知您是否有試過我寫的那一範例呢?(在你的C Builder上執行) 如果在你的BCB中Compiler且執行無誤,表示您的Timer元件及BCB沒問題. 然後再對照著我寫的範例...自行做一遍看看可否執行無誤... 如果有錯誤...再重新check一遍.. 另外請Check Unit2.cpp中,你是否有加上下面的程式碼
void __fastcall TForm2::FormCreate(TObject *Sender)
{
  Timer1->Interval=2000;
  Timer1->Enabled=true;
}
//---------------------------------------------------------------------------    void __fastcall TForm2::Timer1Timer(TObject *Sender)
{
   Form2->Close();    }
//---------------------------------------------------------------------------
或者把您寫的Source Code貼上來,讓大家幫你看看 您光這樣講,我想神仙也不知你的錯誤出在哪裡...只能用瞎猜的...哈哈... < class="code"> /*開心的事情別隱藏在心裡,分享給別人知道會更快樂的*/ /*得到新知識別隱藏在心裡,分享給別人了解會更清楚的*/ 發表人 - axsoft 於 2003/08/17 16:26:21
drew
一般會員


發表:5
回覆:7
積分:2
註冊:2003-08-15

發送簡訊給我
#5 引用回覆 回覆 發表時間:2003-08-17 20:34:50 IP:163.28.xxx.xxx 未訂閱
你好:以下是我的程式  不好意思 耽誤大家許久時間 感謝RaynorPao 的回答 // Unit1.cpp //--------------------------------------------------------------------------- #include  #pragma hdrstop #include "Unit1.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma resource "*.dfm" TForm1 *Form1; //--------------------------------------------------------------------------- __fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner) { } //--------------------------------------------------------------------------- //Unit2.cpp //--------------------------------------------------------------------------- #include #pragma hdrstop #include "Unit2.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma resource "*.dfm" TForm2 *Form2; //--------------------------------------------------------------------------- __fastcall TForm2::TForm2(TComponent* Owner) : TForm(Owner) { } //--------------------------------------------------------------------------- void __fastcall TForm2::FormCreate(TObject *Sender) { Timer1->Enabled = true; Timer1->Interval = 2000;//Timer設定為2秒後將Form2關閉 } //--------------------------------------------------------------------------- void __fastcall TForm2::Timer1Timer(TObject *Sender) { Form2->Close(); } //---------------------------------------------- // Project1.cpp //--------------------------------------------------------------------------- #include #include "Unit2.h" #pragma hdrstop //--------------------------------------------------------------------------- USERES("Project1.res"); USEFORM("Unit1.cpp", Form1); USEFORM("Unit2.cpp", Form2); //--------------------------------------------------------------------------- WINAPI WinMain(HINSTANCE, HINSTANCE, LPSTR, int) { try { Application->Initialize(); Application->CreateForm(__classid(TForm1), &Form1); Application->CreateForm(__classid(TForm2), &Form2); Form2->ShowModal(); //加入這一行,不可使用Form2->Show,如使用Form2->Show會被Form1蓋過去 Application->Run(); } catch (Exception &exception) { Application->ShowException(&exception); } return 0; } //------------------------------------
axsoft
版主


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

發送簡訊給我
#6 引用回覆 回覆 發表時間:2003-08-17 21:22:34 IP:211.76.xxx.xxx 未訂閱
drew 您好:    1.我不是RaynorPao版主,您認錯人了
2.由您的程式碼看來,是照抄我寫的範例沒錯,也沒看出您那裡打錯字?
3.就我前次回答的,我寫的範例檔可否在你的C   Builder中正常將Form2 
  Close?如果也不行,那我只能建議您自幾寫個Timer計時看看,Timer可否正常
 Work.如下:    Unit1.cpp
//---------------------------------------------------------------------------    #include 
#pragma hdrstop    #include "Unit1.h"
//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
        : TForm(Owner)
{
}
//---------------------------------------------------------------------------    void __fastcall TForm1::FormCreate(TObject *Sender)
{
 Timer1->Interval=1000;
 Timer1->Enabled=true;    }
//---------------------------------------------------------------------------    void __fastcall TForm1::Timer1Timer(TObject *Sender)
{
 Form1->Caption=Now();
}
//---------------------------------------------------------------------------    4.如果Form1的Caption能正常顯示日期時間,我想你的Timer1元件沒問題..
5.如果都試不行建議您把C   Builder重裝試試!..
>        < class="code">
/*開心的事情別隱藏在心裡,分享給別人知道會更快樂的*/
/*得到新知識別隱藏在心裡,分享給別人了解會更清楚的*/
發表人 - axsoft 於 2003/08/17 21:27:11
drew
一般會員


發表:5
回覆:7
積分:2
註冊:2003-08-15

發送簡訊給我
#7 引用回覆 回覆 發表時間:2003-08-18 00:51:50 IP:163.28.xxx.xxx 未訂閱
axsoft 你好: 謝謝你的回答,我在這個問題上也沒解出來。   最後只好引用你寫的程式,希望你不要介意。      關於程式碼的部分我會改進,由於我是新手,   有很多不懂,如有犯錯請多包函。      再次感謝你的幫忙。。。。
系統時間:2024-05-06 16:25:15
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!