一問題的提出
我公司在開發醫院信息管理系統的過程中由於系統龐大遇到這樣一個棘手的問題
我們制作了若干個用戶自定義的數據窗口對象 每個對象中封裝了一個獨立的功能 如 數據窗口排序功能用戶自定義列校驗功能下拉數據窗口快速錄入功能大文本錄入功能回車到下一列功能等等 共個功能對象 由不同的人制作
我們需要任意選取其中的某幾個功能對象做為祖先繼承 由於PB不允許一個對象同時繼承不同的祖先且祖先一旦確定 就不允許改變 如果將這個用戶自定義數據窗口對象的功能全部封裝到一個用戶自定義數據窗口對象中 雖然能解決繼承問題 但是該對象會很龐大對象內部邏輯變得更復雜 更難以維護一些在調用時用不上的功能 勢必會在運行時消耗更多的系統資源 既然繼承的路走不通 筆者就想出了一個對象變量引用的方法
二解決問題的思路
首先筆者引入了二個概念(指用戶定義的數據窗口對象)
基本功能對象 具有單一功能的獨立的用戶自定義的對象
中間層對象 把自己捕獲到的事件以某種方式傳遞給基本功能對象實例變量 以完成對基本功能對象相應的事件腳本的調用被繼承 但不繼承任何其它對象
另做一個用戶自定義數據窗口對象它不繼承任何對象 稱之為中間層對象 在中間層對象中為每個需要用到的基本功能對象聲明一個實例對象變量 在中間層對象的事件中去調用實例對象相應的事件 使用時繼承中間層對象 以完成對基本對象的選擇與調用
實現舉例
基本功能對象制作
新建二個數據窗口用戶對象 分別命名為 Uo_DwA Uo_DwB 在Uo_DwA 的Clicked 事件中寫一行腳本
MessageBox ( Uo_DwA Uo_DwA 的單擊事件)
在Uo_DwB 的Clicked 事件中寫一行腳本
MessageBox ( Uo_DwB Uo_DwB 的單擊事件)
中間層對象制作
新建一個數據窗口用戶對象 命名為 Uo_DwInterlayer
為中間層對象聲明二個實例變量
[] [] []
From:http://tw.wingwit.com/Article/program/PB/201311/11111.html
