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

要如何使用MainMenu,在MDIForm中開啟另一個子表單

答題得分者是:feng2939
superforsin
一般會員


發表:6
回覆:8
積分:7
註冊:2015-05-14

發送簡訊給我
#1 引用回覆 回覆 發表時間:2015-05-15 03:08:36 IP:124.219.xxx.xxx 訂閱
1.子表單為 UNIT2 ,Form2

2.母表單為 Main ,Main_Form

3.在 Main 表頭中引入子表單;Include "UNIT2.h"
然後在MainMune Click()事件中加入; Form2->Show();

但是在編譯上是正常,實際點選MainMune觸發時卻會發生錯誤
錯誤訊息顯示 VCL140.bpl 發生衝突之類的

希望高手能幫忙解答,非常感謝
feng2939
一般會員


發表:22
回覆:30
積分:15
註冊:2013-03-26

發送簡訊給我
#2 引用回覆 回覆 發表時間:2015-05-15 16:36:42 IP:211.21.xxx.xxx 訂閱
最近做了一個 MDI, 試著回答你的問題.
1). Main form code :
implementation

{$R *.dfm}

uses unit2;

procedure TMainForm.Button1Click(Sender: TObject);
var
Form2 : TForm2;

begin
.....
Form2 := TForm2.Create(application);

2). unit2 form code:
implementation

{$R *.dfm}
uses main;
....
...
procedure Form2.FormClose(Sender: TObject; var Action: TCloseAction); // Form2 /Events/onColse 屬性
begin
Action:=caFree;
end


3). Main 的 FormStyle: fsMDIForm, unit2 的 FormStyle: fsMDIChild

4). menu中的 Project/Forms Main form: 設定 Main, Available forms: unit2

也是初學者,有不足之處, 還請高手指正.

===================引 用 superforsin 文 章===================
1.子表單為 UNIT2 ,Form2

2.母表單為 Main ,Main_Form

3.在 Main 表頭中引入子表單;Include "UNIT2.h"
然後在MainMune Click()事件中加入; Form2->Show();

但是在編譯上是正常,實際點選MainMune觸發時卻會發生錯誤
錯誤訊息顯示 VCL140.bpl 發生衝突之類的

希望高手能幫忙解答,非常感謝
------
DVF
系統時間:2017-12-14 21:13:00
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!