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

隱藏游標的問題?

尚未結案
breyd
一般會員


發表:11
回覆:10
積分:4
註冊:2003-05-29

發送簡訊給我
#1 引用回覆 回覆 發表時間:2003-10-24 12:04:06 IP:140.118.xxx.xxx 未訂閱
請問各位前輩: 我在fom1中按一個button會開起form2全螢目並且隱藏游標, 在form2上點兩下,關閉form2,顯示form1並且讓游標顯示出來。  為何form1的游標有部份不能顯示出來。  麻煩各位前輩指點~~  謝謝~~~   
---- form1 ----
void __fastcall TForm1::Button1Click(TObject *Sender)
{
 Close();
}    void __fastcall TForm1::Button2Click(TObject *Sender)
{
 Form2->Visible=true;
 Form2->Left=-1024;
 Form2->Top=768;
 Form2->WindowState=wsMaximized;
 Form2->BorderStyle=bsNone;
 ShowCursor(false);
}    void __fastcall TForm1::FormCreate(TObject *Sender)
{
 ShowCursor(true);
}    ----- form2 ----
void __fastcall TForm2::FormDblClick(TObject *Sender)
{
 Form2->Visible=false;
}
發表人 - breyd 於 2003/10/24 12:05:55 發表人 - taishyang 於 2003/10/24 12:10:26
RaynorPao
版主


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

發送簡訊給我
#2 引用回覆 回覆 發表時間:2003-10-24 14:59:29 IP:203.73.xxx.xxx 未訂閱
引言: 請問各位前輩: 我在fom1中按一個button會開起form2全螢目並且隱藏游標, 在form2上點兩下,關閉form2,顯示form1並且讓游標顯示出來。 為何form1的游標有部份不能顯示出來。 麻煩各位前輩指點~~ 謝謝~~~
---- form1 ----
void __fastcall TForm1::Button1Click(TObject *Sender)
{
 Close();
}    void __fastcall TForm1::Button2Click(TObject *Sender)
{
 Form2->Visible=true;
 Form2->Left=-1024;
 Form2->Top=768;
 Form2->WindowState=wsMaximized;
 Form2->BorderStyle=bsNone;
 ShowCursor(false);
}    void __fastcall TForm1::FormCreate(TObject *Sender)
{
 ShowCursor(true);
}    ----- form2 ----
void __fastcall TForm2::FormDblClick(TObject *Sender)
{
 Form2->Visible=false;
}
breyd 你好:
(1)假設 Form1 是 Auto-Create Form,Form2 是 Available Form (由 Project
   /Options/Forms 設定)
(2)請參考以下的範例程式碼
// >>>>>>>    -- 
        
------
-- 若您已經得到滿意的答覆,請適時結案!! --
-- 欲知前世因,今生受者是;欲知來世果,今生做者是 --
-- 一切有為法,如夢幻泡影,如露亦如電,應作如是觀 --
breyd
一般會員


發表:11
回覆:10
積分:4
註冊:2003-05-29

發送簡訊給我
#3 引用回覆 回覆 發表時間:2003-10-24 15:50:36 IP:140.118.xxx.xxx 未訂閱
假設 Form1 是 Auto-Create Form,Form2 是 Available Form (由 Project /Options/Forms 設定) ------------------------------------------------------------------- 謝謝前輩指點 小弟目前是使用Form1,Form2為Auto-Create Form, 就會遇到Form2 結束後,游標指到 Form1上游標就隱藏起來。 麻煩指點迷津~~ 謝謝~~
RaynorPao
版主


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

發送簡訊給我
#4 引用回覆 回覆 發表時間:2003-10-25 00:48:47 IP:61.221.xxx.xxx 未訂閱
引言: 謝謝前輩指點 小弟目前是使用Form1,Form2為Auto-Create Form, 就會遇到Form2 結束後,游標指到 Form1上游標就隱藏起來。 麻煩指點迷津~~ 謝謝~~
breyd 你好: 那試試看改成這樣子呢?? < class="code"> // Unit1.cpp #include "Unit2.h" void __fastcall TForm1::Button1Click(TObject *Sender) { Close(); } void __fastcall TForm1::Button2Click(TObject *Sender) { Form2->Show(); } // Unit2.cpp __fastcall TForm2::TForm2(TComponent* Owner) : TForm(Owner) { Left=0; Top=0; WindowState=wsMaximized; BorderStyle=bsNone; Hide(); } void __fastcall TForm2::FormDblClick(TObject *Sender) { Hide(); } void __fastcall TForm2::FormShow(TObject *Sender) { ShowCursor(false); } void __fastcall TForm2::FormHide(TObject *Sender) { ShowCursor(true); } -- Enjoy Researching & Developing --
------
-- 若您已經得到滿意的答覆,請適時結案!! --
-- 欲知前世因,今生受者是;欲知來世果,今生做者是 --
-- 一切有為法,如夢幻泡影,如露亦如電,應作如是觀 --
系統時間:2024-05-17 16:02:54
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!