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

Form的setfouces

答題得分者是:jest0024
kenbcb
中階會員


發表:171
回覆:129
積分:60
註冊:2003-07-15

發送簡訊給我
#1 引用回覆 回覆 發表時間:2004-05-20 14:38:48 IP:220.130.xxx.xxx 未訂閱
請問各位大大: 我原本有一個form ,按一個按鈕動態產生一個form, 但動態form有一個edit, mouse不能點它及打字.. 動態form 被點到了,form標題也沒變藍, 只有原本form標題是藍
ENIX007
高階會員


發表:28
回覆:274
積分:185
註冊:2003-11-27

發送簡訊給我
#2 引用回覆 回覆 發表時間:2004-05-20 16:08:32 IP:210.243.xxx.xxx 未訂閱
kenbcb您好 能否附上原始碼呢? 我這樣用都沒問題耶 > class="code"> //--------------------------------------------------------------------------- #include #pragma hdrstop #include "Unit1.h" #include "Unit2.h" //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma resource "*.dfm" TForm1 *Form1; //--------------------------------------------------------------------------- __fastcall TForm1::TForm1(TComponent* Owner) : TForm(Owner) { } //--------------------------------------------------------------------------- void __fastcall TForm1::Button1Click(TObject *Sender) { Form2 = new TForm2(Application); Form2->Show(); } //--------------------------------------------------------------------------- void __fastcall TForm1::FormClose(TObject *Sender, TCloseAction &Action) { if (Form2) delete Form2; Action = caFree; } //--------------------------------------------------------------------------- 程式迷人之處,在於邏輯思考,然而卻也是惱人之處~~
------
程式迷人之處,在於邏輯思考,然而卻也是惱人之處~~
jest0024
高階會員


發表:11
回覆:310
積分:224
註冊:2002-11-24

發送簡訊給我
#3 引用回覆 回覆 發表時間:2004-05-20 20:18:50 IP:211.74.xxx.xxx 未訂閱
引言: 請問各位大大: 我原本有一個form ,按一個按鈕動態產生一個form, 但動態form有一個edit, mouse不能點它及打字.. 動態form 被點到了,form標題也沒變藍, 只有原本form標題是藍
Form不必指定Parent屬性 學而時習之不亦樂乎!
kenbcb
中階會員


發表:171
回覆:129
積分:60
註冊:2003-07-15

發送簡訊給我
#4 引用回覆 回覆 發表時間:2004-05-20 21:20:57 IP:218.169.xxx.xxx 未訂閱
可是我不想超出原本form中, 但動態視窗的edit元件,無法點到編輯, 而其它button 卻可以用 ????
ENIX007
高階會員


發表:28
回覆:274
積分:185
註冊:2003-11-27

發送簡訊給我
#5 引用回覆 回覆 發表時間:2004-05-21 08:39:23 IP:210.243.xxx.xxx 未訂閱
kenbcb您好 試試MDI如何? 把Form1的FormStyle改成fsMDIForm,Form2改成fsMDIChild... 程式迷人之處,在於邏輯思考,然而卻也是惱人之處~~
------
程式迷人之處,在於邏輯思考,然而卻也是惱人之處~~
jest0024
高階會員


發表:11
回覆:310
積分:224
註冊:2002-11-24

發送簡訊給我
#6 引用回覆 回覆 發表時間:2004-05-21 11:36:19 IP:203.67.xxx.xxx 未訂閱
1. BorderStyle = bsNone; 2. Form->Parent = Form1; //拿掉 Windows->SetParent(Form->Handle,Form1->Handle); //改為這樣! 學而時習之不亦樂乎! 發表人 - jest0024 於 2004/05/21 11:40:59
系統時間:2024-05-19 5:58:53
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!