VFP 愛用者社區

[小賴]

如果 oText1 為 FORM1 之物件 (可能置於 FORM1 之某容器內或直接置於FORM1)
當 oText1 被當參數傳到 FORM2 時 ; 請教如何於 FORM2中 有效的參照 FORM1 ?

[小賴]

沒人鳥我 ? 很 "敗市" !
什麼 ? "題目太深" ; 不會吧 !
那改成選擇題總可以吧 :
1. 題目沒水準 ; 大家不屑作答.
2. 題目描述不清, 不知從何答起.
3. 題目太深, 大家特著看解答
4. 這裹的高手都很忙; 沒空作答

這樣回應很簡單了吧 !

[syntech]

我不知道能不能這樣做,


例如 form 上 另有一個 text2

階層關係如下:
form1
　+ text1
　+ text2

otext1 = _SCREEN.FORM1.text1

則利用 otext1 存取 text2.value
應該是
otext1.parent.text2.value
　　　　^
　　　　轉成 form1

應該可以使用 parent 吧!

[小桑•無痕]

Form1.oText1.Value

[小桑•無痕]

[syntech]

相煎何太急 -- 作伙來煎煮 '何太急' 這位仁兄

[小賴]

階層關係如下:
form1
　+ text1
　+ text2

ctext1 = _SCREEN.FORM1.text1

則利用 otext1 存取 text2.value
應該是
otext1.parent.text2.value
　　　　^
　　　　轉成 form1
-----------------------------------------------------------
Syntech 兄：
我該如何知道　Text1 與 Form1 之關係
也就是說: oText1.Parent 是 FORM1
還是 oText1.Parent.Parent 才是 FORM1
還是 oText1.Parent.Parent.Parent 才是 FORM1 ?

[小賴]

小桑•無痕兄 :
"分身與本尊"的關係到底還是不一樣 !
可是小弟愚昧; 無法領悟您的提示：Form1.oText1.Value

[syntech]

所以我把 "階層" 畫出來,
因為我平常也是先知道"階層"才知道關係為何,

否則,用到 parent ,controlcount ,controls[], baseclass, name 等等 去瀏覽 所有物件,
那可就累了.

[小賴]

所以我把 "階層" 畫出來,
因為我平常也是先知道"階層"才知道關係為何,

TO : Syntech兄

首先感謝您的指點, 說也奇怪; 最近我的PO都只有你 "捧場"
再來跟你說抱歉 ; 因為我沒把問題說清楚, 害你做了許多白工.

問題描述：
我想利用ASELOBJ(), ReadMethod(), WriteMethod() 設計自已的 Grid Builder
於FORM的設計階段,利用這個 Builder 存取或設定我的Grid相關屬性(當然包括Column, Header, Text)
也可利用這個Builder自動產生相關事件, 方法的程序碼.
現在我想讓我的Builder也能同時設定Form或Form中其他物件, 但是我的Grid並非全置於Form下
有的是置於ThisForm.Pageframe.Page ....等容器下
我的Builder必需適合各種Grid與FORM位置之情況, 所以無法如你所說的 ----
把 "階層" 畫出來
嚴格來說 "階層" 關係就是我程式要解決的問題, 你的已知條件對我來說卻是未知.

[syntech]

最近我也在作類似的事,
但是我用的方法比較簡單,
也不想設計的太複雜.

form可以很複雜,物件可以很多,
但是只要抓到一個關鍵,
就不需要考慮這些階層之間的關係.

這已經是"機密"了,不能透漏.
想給你提示,
問題在於這個提示本身就是關鍵,

殘念........

[syntech]

用 parent ,controlcount ,controls[], baseclass, name 等等 去瀏覽 所有物件
這是符合你問題的答案,
但不是我的做法

[215001]

如果只是單純要參照到前一個表單的 oText1 物件

A.於 Form1 執行 do form form2 with thisform.oText1 && 傳遞物件

B.於 Form2 :
　1.自訂屬性 xobj
　2.Init 加入下列程式碼:
　　　para xobj
　　　thisform.xobj=xobj && 轉成表單的共用屬性

　3.參照時: 只要下 thisform.xobj.value 就相當於參照到 Form1.oText1.value

[小賴]

TO 215001兄
感謝您的回應 ; 可是我要參照的並非Form1.oText1
而是oText1所在的Form1或位於Form1中之其他物件
(同樣需以xObj來参照)

[小桑•無痕]

TO 小賴 :
果然是很深澳的問題.....
呵呵...
還是看不懂問題....