Powerbuilder 12.5獲取父窗口變量

Question

嘗試從響應窗口的父窗口獲取變量（這兩個窗口都是繼承的 - 我沒有源代碼）。我能夠循環所有的父變量，對象，控件等，但我似乎無法讀取任何變量。此代碼適用於「OK事件」。感謝任何幫助。

window lw_active, w_parentwindow 
string ls_winname, ls_libname, ls_wintitle 
ClassDefinition cd_windef 


w_parentwindow = this.ParentWindow() 
lw_active = w_parentwindow.GetFirstSheet() 

if isvalid(lw_active) = True then 
     ls_winname = lw_active.classname() 

     cd_windef = FindClassDefinition(ls_winname) 
     ls_libname = cd_windef.LibraryName 
     ls_wintitle = lw_active.title 

     messagebox(ls_winname, ls_libname+'~r~n~r~n'+ls_wintitle, Information!)  

     string s, lineend 
integer li 
VariableDefinition vard 
lineend = "~r~n" 
FOR li = 1 to UpperBound(cd_windef.VariableList) 
    vard = cd_windef.VariableList[li] 
    s = s + vard.Name + lineend 
NEXT 
messagebox('s',s) 

end if 

Answer 1

1. 繼承您要訪問的窗口。我會打電話給你的後代窗口w_mine和祖先w_theirs。
2. 將訪問器方法添加到w_mine。你將能夠引用任何不是私有的東西。
3. 聲明一個w_mine類型的變量。
4. 將窗口引用分配給w_mine。然後你可以調用你添加到w_mine的方法。
5. 不要破壞w_mine。簡單地讓它超出範圍。在PB中，不需要設置變量null或做任何特殊的事情。請注意，如果關閉該窗口，則您的引用將變爲無效。我會避免使用實例變量來保存引用。