pb datastore的數據如何顯示在datawindow上

datastore最常用的用法是

datastore ds

ds = create datastore

ds.dataobject = 'd_XXX'

然而問題在於,這樣的用法只是給d_XXX找了個一個替身,數據的查詢依然執行的是d_XXX的SQL。那麼當datastore用自己的SQL查詢出來的數據如何賦值給dw並在dw中顯示呢?方法如下:

datastore cardinfo   //必須聲明爲全局變量Globle Variables,否則如果在某個事件中直接聲明,由於是局部變量,當事件函數執行                                         完畢後ds會被自動destroy,導致單機按鈕dw中的數據爲空,雙擊按鈕dw中出現數據,再點一下其他的地方數                                       據又消失,這種奇怪的現象,其原因就是垃圾回收機制將ds銷燬所致。

sqlstr = "SELECT id, cardno, zdr, kzsfz, dqfqbz, yxq, dqhke, mm, yhid, xlk FROM info_card WHERE (cardno NOT IN (SELECT a.cardno FROM hkfa_y a, info_card b WHERE a.cardno <> b.cardno OR  (a.cardno = b.cardno AND a.y <> 6))) "


cardinfo = create datastore

 cardinfo.dataobject = dw_1.dataobject    // 不能寫成dw_1.dataobject = cardinfo.dataobject 否則dw將變成空的。因爲cardinfo的                                                                                dataobject此時爲空,也不能放在cardinfo.retrieve()之後,否則dw也爲空。

Is_syntax = sqlca.syntaxfromsql(sqlstr,"style(type=grid)",Is_errtext)

if len(Is_errtext) > 0 then
    return -1
end if

cardinfo.create(Is_syntax,Is_errtext)

if len(Is_errtext) > 0 then
    return -1
end if

cardinfo.settransobject(sqlca)
cardinfo.retrieve()

cardinfo.sharedata(dw_1)

注意:

1.需要保證datastore數據列與dw中的dataobject數據列的數據類型,名稱,順序完全一致。也就是SQL語句中的select列

2.datastore 生存期需要跟dw_1一致,不然datastore被回收後共享的數據也就沒了
ds如果是Sub,Fuction等局部變量的話dataShare後數據很快又被清空,一般將ds聲明成窗體(實例變量)

發表評論
所有評論
還沒有人評論,想成為第一個評論的人麼? 請在上方評論欄輸入並且點擊發布.
相關文章