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

如何在Form2 上使用「動態產生」Form1上的vcl元件

答題得分者是:channel
esp_pzj
初階會員


發表:32
回覆:70
積分:40
註冊:2007-02-09

發送簡訊給我
#1 引用回覆 回覆 發表時間:2007-04-03 21:56:07 IP:219.86.xxx.xxx 訂閱
如何在Form2 上使用「動態產生」Form1上的vcl元件

使用TFrom1.Create(Self)方法,產生Form1
Form1有一個 Button1;

在Form2
呼叫 FORM1.Button1.Click;
會出現錯誤。

請問有其他的方法可以解決嗎?

------
學藝不精 謝多多指教
編輯記錄
dllee 重新編輯於 2007-04-21 19:05:21, 註解 修改文章分類由 無 -> 問題, 提問時, 請記得選擇 [問題] 分類, 才能把分數給辛苦答題的會員, 謝謝您的配合‧‧
channel
尊榮會員


發表:67
回覆:707
積分:854
註冊:2002-05-02

發送簡訊給我
#2 引用回覆 回覆 發表時間:2007-04-03 22:08:01 IP:59.114.xxx.xxx 訂閱
Button1宣告在Form1的Public,Form2要uses Form1

~小弟淺見,參考看看~

===================引 用 文 章===================
如何在Form2 上使用「動態產生」Form1上的vcl元件

使用TFrom1.Create(Self)方法,產生Form1
Form1有一個 Button1;

在Form2
呼叫 FORM1.Button1.Click;?
會出現錯誤。

請問有其他的方法可以解決嗎?

------
~小弟淺見,參考看看~
esp_pzj
初階會員


發表:32
回覆:70
積分:40
註冊:2007-02-09

發送簡訊給我
#3 引用回覆 回覆 發表時間:2007-04-03 22:24:07 IP:219.86.xxx.xxx 訂閱
請問要如何宣告
是把 原本宣告 TYPE 內的 剪到 Public 內嗎?
我試過會出現 錯誤

===================引 用 文 章===================
Button1宣告在Form1的Public,Form2要uses Form1

~小弟淺見,參考看看~

===================引 用 文 章===================
如何在Form2 上使用「動態產生」Form1上的vcl元件

使用TFrom1.Create(Self)方法,產生Form1
Form1有一個 Button1;

在Form2
呼叫 FORM1.Button1.Click;?
會出現錯誤。

請問有其他的方法可以解決嗎?

------
學藝不精 謝多多指教
Stallion
版主


發表:52
回覆:1600
積分:1995
註冊:2004-09-15

發送簡訊給我
#4 引用回覆 回覆 發表時間:2007-04-03 22:38:44 IP:211.22.xxx.xxx 未訂閱
在Form1的public部分寫一個公開的程序,該程序裡面呼叫Form1的Protected部分的Button1.Click,那麼Form2即可經由呼叫那個公開的程序執行Form1.Button1.Click。
channel
尊榮會員


發表:67
回覆:707
積分:854
註冊:2002-05-02

發送簡訊給我
#5 引用回覆 回覆 發表時間:2007-04-03 22:54:18 IP:59.114.xxx.xxx 訂閱
剛看錯了…sorry…
您在Form2的implementation底下有uses Form1 Unit嗎?
若還是有問題,可以將code或錯誤的畫面post上來嗎?

~小弟淺見,參考看看~


===================引 用 文 章===================
請問要如何宣告
是把?原本宣告?TYPE? 內的? 剪到 Public 內嗎?
我試過會出現 錯誤

===================引 用 文 章===================
Button1宣告在Form1的Public,Form2要uses Form1

~小弟淺見,參考看看~

===================引 用 文 章===================
如何在Form2 上使用「動態產生」Form1上的vcl元件

使用TFrom1.Create(Self)方法,產生Form1
Form1有一個 Button1;

在Form2
呼叫 FORM1.Button1.Click;?
會出現錯誤。

請問有其他的方法可以解決嗎?

------
~小弟淺見,參考看看~
esp_pzj
初階會員


發表:32
回覆:70
積分:40
註冊:2007-02-09

發送簡訊給我
#6 引用回覆 回覆 發表時間:2007-04-05 13:00:38 IP:219.81.xxx.xxx 訂閱
錯誤的畫面..
Project BOMSystem.exe raised exception EaccessViolation with message 'Access violation at address 004AAF94 in module 'BOMSystem.exe'. Read of address 00000358'. Process stopped. Use Step or Run to continue.


我有uses Form1 Unit。

===================引 用 文 章===================
剛看錯了…sorry…
您在Form2的implementation底下有uses Form1 Unit嗎?
若還是有問題,可以將code或錯誤的畫面post上來嗎?

~小弟淺見,參考看看~


------
學藝不精 謝多多指教
channel
尊榮會員


發表:67
回覆:707
積分:854
註冊:2002-05-02

發送簡訊給我
#7 引用回覆 回覆 發表時間:2007-04-05 18:07:27 IP:59.114.xxx.xxx 訂閱
因為您是要用Form1的Button1物件,所以要先Create Form1吧,這樣才不會錯誤…

Form1 := TForm1.Create(nil);//加上這一行吧
Form1.Button1.Click;


~小弟淺見,參考看看~
===================引 用 文 章===================
錯誤的畫面..
Project BOMSystem.exe raised exception EaccessViolation with message 'Access violation at address 004AAF94 in module 'BOMSystem.exe'. Read of address 00000358'. Process stopped. Use Step or Run to continue.


我有uses Form1 Unit。

===================引 用 文 章===================
剛看錯了…sorry…
您在Form2的implementation底下有uses Form1 Unit嗎?
若還是有問題,可以將code或錯誤的畫面post上來嗎?

~小弟淺見,參考看看~


------
~小弟淺見,參考看看~
esp_pzj
初階會員


發表:32
回覆:70
積分:40
註冊:2007-02-09

發送簡訊給我
#8 引用回覆 回覆 發表時間:2007-04-09 08:58:46 IP:210.60.xxx.xxx 訂閱
感謝:Stallion及channel:
Form1 := TForm1.Create(nil);//
利用這種方式來開起動態的Form1 就可以使用Form1.Button1.Click;,
這個問題小弟在開始 學Delph 就出現了,直到現在才解決,小弟學兩個月,
謝謝個位高手 不吝嗇指導我們這些新手。


===================引 用 文 章===================
因為您是要用Form1的Button1物件,所以要先Create Form1吧,這樣才不會錯誤…

Form1 := TForm1.Create(nil);//加上這一行吧
Form1.Button1.Click;


~小弟淺見,參考看看~
===================引 用 文 章===================
錯誤的畫面..
Project BOMSystem.exe raised exception EaccessViolation with message 'Access violation at address 004AAF94 in module 'BOMSystem.exe'. Read of address 00000358'. Process stopped. Use Step or Run to continue.

------
學藝不精 謝多多指教
pgdennis
資深會員


發表:41
回覆:526
積分:443
註冊:2002-05-23

發送簡訊給我
#9 引用回覆 回覆 發表時間:2007-04-18 16:54:16 IP:59.120.xxx.xxx 未訂閱
放個馬後砲

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