PB中同時“繼承”多個用戶自定義數據窗口對象[3]_電腦知識網
熱點推薦:
您现在的位置: 電腦知識網 >> 編程 >> PB編程 >> 正文

PB中同時“繼承”多個用戶自定義數據窗口對象[3]

2013-11-12 23:34:13  來源: PB編程 
    //用中間層函數注冊對象數組和本數據窗口對象
  Uf_Register ( Lgo_BaseDwObject[] THIS)
  Return

   運行窗口W_TestInterlayer 單擊 DW_ 會依次彈出個消息框
  在實際應用中 由於基本功能對象是被引用的而非繼承 所以基本功能對象腳本中的代詞THIS為空 為此

  需要在基本功能對象中聲明一個實例變量 DataWindow Idw_THIS 

  加一個注冊函數用來為實例變量Idw_THIS 賦值 函數名稱 Uf_RegisterDwo (DataWindow Adw_THIS)

  函數內容
  Idw_THIS = Adw_THIS
  Return

  對象中所有對數據窗口操作的函數前都必須加上 Idw_THIS 進行完全路徑的引用
  因為這些基本功能對象被繼承過為了向前兼容 所以要在它們的Constructor 事件中寫入如下腳本

  IF Not IsValid (Idw_This) THEN
    Idw_This = THIS
  END IF
  Retrun

  以便對實例變量Idw_THIS 自動賦值

[]  []  []  


From:http://tw.wingwit.com/Article/program/PB/201311/11113.html
    Copyright © 2005-2013 電腦知識網 Computer Knowledge   All rights reserved.