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

父視窗如何傳資料給子視窗?

尚未結案
gcpp
一般會員


發表:16
回覆:19
積分:7
註冊:2004-12-29

發送簡訊給我
#1 引用回覆 回覆 發表時間:2005-01-07 20:46:19 IP:61.219.xxx.xxx 未訂閱
Form2是由Form1產生的動態視窗 在Form1的程式裏要如何傳資料給Form2? 請高手指點.
blk5743
高階會員


發表:34
回覆:371
積分:236
註冊:2003-11-17

發送簡訊給我
#2 引用回覆 回覆 發表時間:2005-01-08 23:27:34 IP:61.31.xxx.xxx 未訂閱
你可以在Unit 1的全域變數宣告一個int AAA 在Unit 2要用到的地方再用extern int AAA 這樣就會使用同一塊記憶體了(使用同一個變數)
gcpp
一般會員


發表:16
回覆:19
積分:7
註冊:2004-12-29

發送簡訊給我
#3 引用回覆 回覆 發表時間:2005-01-09 14:51:43 IP:61.219.xxx.xxx 未訂閱
請問一下如果我在父視窗Form1有用到Image,( 像在Unit1.h內宣告TImage *Image1;) 那在子視窗Form2的程式Unit2內要如何來傳資料給Image1? 再請指教 發表人 - gcpp 於 2005/01/09 19:29:08
arisaka_matsuri
高階會員


發表:25
回覆:205
積分:231
註冊:2003-10-19

發送簡訊給我
#4 引用回覆 回覆 發表時間:2005-01-09 20:00:54 IP:140.113.xxx.xxx 未訂閱
dear gcpp: 只要在Unit1.cpp中引入Unit2.h,Unit2.cpp中引入Unit1.h就可以了。如此一來在Form2中要存取Form1的Image1寫成Form1->Image1,跟物件的用法一樣。
gcpp
一般會員


發表:16
回覆:19
積分:7
註冊:2004-12-29

發送簡訊給我
#5 引用回覆 回覆 發表時間:2005-01-09 22:15:45 IP:61.219.xxx.xxx 未訂閱
請問arisaka_matsuri大大,在Form2的Unit2內的程式加入 Form1->Image1->Stretch=true; 之後當圖形小於Image1的大小時則圖形會放大來合進Image1 但這樣在做Image1->Canvas->LineTo()時滑鼠的作標與實際看到的畫圖位置會不同點(有偏移) 有方法可以使得滑鼠坐標與畫線坐標一致? 請指教
arisaka_matsuri
高階會員


發表:25
回覆:205
積分:231
註冊:2003-10-19

發送簡訊給我
#6 引用回覆 回覆 發表時間:2005-01-10 12:41:20 IP:140.113.xxx.xxx 未訂閱
dear gcpp: TIimage::Stretch 雖然很好用,但是如果不是純顯示,而是像你這樣還要加東西上去,會變得比較麻煩一點。座標點的表示上,滑鼠在Image上傳回的位置是根據Image的實際尺寸(跟圖片無關)來表示。但是,在Canvas上作畫時,使用的座標是跟Image裡的圖片大小一致,畫完後經過stretch的動作,顯示在Image上。 要解決你的問題,就是把滑鼠的座標經過一個比例轉換成對應在Canvas上的座標,這樣就不會有對不到的問題。給你參考囉~
gcpp
一般會員


發表:16
回覆:19
積分:7
註冊:2004-12-29

發送簡訊給我
#7 引用回覆 回覆 發表時間:2005-01-10 13:02:29 IP:61.219.xxx.xxx 未訂閱
我去試試看 謝謝指點喔
JPTseng
一般會員


發表:14
回覆:22
積分:7
註冊:2004-10-27

發送簡訊給我
#8 引用回覆 回覆 發表時間:2005-01-10 19:15:27 IP:140.124.xxx.xxx 未訂閱
引言: Form2是由Form1產生的動態視窗 在Form1的程式裏要如何傳資料給Form2? 請高手指點.
這問題已經問很多次了~~ 請參考之前的文章 http://delphi.ktop.com.tw/link.asp?TOPIC_ID=58923
gcpp
一般會員


發表:16
回覆:19
積分:7
註冊:2004-12-29

發送簡訊給我
#9 引用回覆 回覆 發表時間:2005-01-10 20:02:47 IP:61.219.xxx.xxx 未訂閱
多謝了,如果是動態視窗要結束是要如何下參數? 是要如何代參數FormClose(??); void __fastcall TForm2::FormClose(TObject *Sender, TCloseAction &Action) { Action=caFree; }
系統時間:2024-03-29 19:40:32
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!