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数据列的数据类型,名称,顺序完全一致,注意是dw的datasource中的列顺序,而不是dw显示出来的列顺序。也就是SQL语句中的select列
2.datastore 生存期需要跟dw_1一致,不然datastore被回收后共享的数据也就没了
ds如果是Sub,Fuction等局部变量的话dataShare后数据很快又被清空,一般将ds声明成窗体(实例变量)
原文链接:https://blog.csdn.net/wolfalcon/article/details/91353316