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

按在Form1的Button會彈出Form2

答題得分者是:kevinguo
200210011
一般會員


發表:2
回覆:2
積分:0
註冊:2005-07-30

發送簡訊給我
#1 引用回覆 回覆 發表時間:2005-08-16 19:58:58 IP:203.218.xxx.xxx 未訂閱
請問如何做此效果 按在Form1的Button會彈出Form2 Thanks~
kevinguo
初階會員


發表:1
回覆:31
積分:31
註冊:2002-11-20

發送簡訊給我
#2 引用回覆 回覆 發表時間:2005-08-16 21:29:50 IP:59.113.xxx.xxx 未訂閱
200210011,您好:      如果你Form2的實際存檔檔名為Unit2   先 #include "Unit2.h"    
 
void __fastcall TForm1::Button1Click(TObject *Sender)
{
  if (Form2==NULL) Application->CreateForm(__classid(TForm2), &Form2);
   Form2->Show();
}
ys168
初階會員


發表:3
回覆:24
積分:25
註冊:2005-10-14

發送簡訊給我
#3 引用回覆 回覆 發表時間:2006-07-15 18:00:38 IP:59.117.xxx.xxx 未訂閱
// 在Form1執行第二個Form2
在第一個Form1執行, 第二個Form2
在第一個Form1內要含入Form2的標頭檔 #include "Form2.h"
void __fastcall TForm1::Button1Click(TObject *Sender)
{
Form2 = new TForm2(Application);
Form2->ShowModal();
delete Form2;

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