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

我不想重複開啟Form

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


發表:25
回覆:32
積分:11
註冊:2002-10-02

發送簡訊給我
#1 引用回覆 回覆 發表時間:2003-05-09 21:40:42 IP:218.165.xxx.xxx 未訂閱
請問師上們! 我的Project多個Form 當我的MainMenu的Form1的 我該怎麼判斷MainMenu1的Checked=true 開啟Form1 MainMenu1的Checked=false 關閉Form1 當Form1開啟時,如要再開啟Form2 Form1會自動關閉 再開啟Form1 請師上們教教我! 我不知道該怎麼做! 暗光鳥初手求學中!
------
溝通網路情、連接數位心
axsoft
版主


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

發送簡訊給我
#2 引用回覆 回覆 發表時間:2003-05-10 01:33:17 IP:218.173.xxx.xxx 未訂閱
Game您好:    
我用猜測的把你的問題整理一下,不知是否是你講的東西
問題一.假設您的MainMenu是在Form1上,要判段MenuItem上的Checked=true時開
       啟Form2,當MenuItem的Checked=false時關閉Form2?

Ans:
unit1.cpp
=========================
#include "unit2.h"     void __fastcall TForm1::OpenFormMenuItemClick(TObject *Sender)
{
  if (OpenFormMenuItem->Checked==false)
      {
       Form2->Show(); //如果Form2秀出後必須關閉後才能做其它動作改用Form2->ShowModal();
       OpenFormMenuItem->Checked=true;
      }
  else
      {
       OpenFormMenuItem->Checked=false;
       Form2->Close(); 
      }
}    

問題二.當Main Form(Form1)開啟Form2時,Main Form(Form1)須隱藏起來,當
       Form2關閉時需再顯示Main Form(Form1),您的意思是這樣嗎?
Ans:

1.Form2開啟時:
Form2->Show();
Form1->Hide();    2.當Form2關閉時
unit2.cpp
===================
#include "unit1.h"
void __fastcall TForm2::FormClose(TObject *Sender, TCloseAction &Action)
{
 if (MessageDlg("Close Form2?", mtConfirmation, TMsgDlgButtons() << mbYes << mbNo,0) == mrYes)
    {
      Action = caFree;
      Form1->Show();
    }
  else
    Action = caMinimize;    }
Delphi.Ktop風紀小隊---[ 發問前請先找找舊文章 ]--- 發表人 - axsoft 於 2003/05/10 01:38:59
game
一般會員


發表:25
回覆:32
積分:11
註冊:2002-10-02

發送簡訊給我
#3 引用回覆 回覆 發表時間:2003-05-10 02:04:16 IP:218.165.xxx.xxx 未訂閱
完全正確! 這正是我要的!! 謝謝您了! 暗光鳥初手求學中!
------
溝通網路情、連接數位心
系統時間:2024-05-07 13:06:32
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!