PB未公开函数.docVIP

PB未公开函数 先做两个试验:在窗口中放一个数据窗口对象,然后在任意可以写代码的地方分别用如下两段代码来做试验.代码段一:数窗名.Object.列名.GetParent()代码段二:DWObject ldwoldwo = 数窗名.Object.列名ldwo.GetParent() 发现问题了吗??当检测代码段一语法时,如果是pb6版本,PB会报告说不认识一个名叫get_attribute函数如果是pb7以上版本报的是不认识__get_attribute.这两个函数其实也没什么新鲜的,很早以前就有人发现了,但是问题就出在程序中并没有使用到该函数.这里不得不说这两个函数在PB的低版本和高版本中的一点微妙变化.早在PB6时这个函数名字叫get_attribute,而以后的版本则变成了__get_attribute这两个函数在帮助中查不到,说明了函数是未公开的.但是功能和使用方法没变化同样是根据dwo对象的名字返回dwo对象.可是不同版本之前函数的名字为什么要变?还有更奇怪的一点,PB有一个工具叫Browser可以用来查看数据类型,等的定义.其中有一项为Window的标签页,列出了应用中所有的窗口对象,如果某个窗口中有datawindow控件,那么请用pb6与pb6以上的版本做个比较,当你展开datawindow控件时,会有一个object的节点.选中该结点,在右边的Functions中可以看到,object的所有成员函数低版本与高版本的区别在于.低版本中列的出函数除了一些常见的以外还有帮助中所查不到的get_attribute,set_attribute,get_attribute_item,set_attribute_item而在高版本中确没有了,但是还能使用.{panel} ? 已知一个DW中的某列的列名（在字符串变量中），获得这个列对象的DWO的方法是： ? ? ? ? {panel:bgColor=#E8F8FF} ? 　　已知一个DW中的某列的列名（在字符串变量中），获得这个列对象的DWO的方法是： ? {code} ? DWObject ldwo_use,ldwo_name ? ldwo_use = dw_1.Object ? ldwo_name = ldwo_use.__get_attribute(name,FALSE) ? ? 这样就可以在用setitem()设置值时,手工调用数窗的itemchanged事件,校验是否接受该值 ? ? ? ? {code} ? 　　这样就可以在用setitem()设置值时,手工调用数窗的itemchanged事件,校验是否接受该值 ? {code} ? int li_rtn ? li_rtn = dw_1.event itemchanged(dw_1.GetROW(),ldwo_name,arg1) ? if li_rtn = 0 then ? dw_1.SetItem(dw_1.GetROW(),name,arg1) ? end if {code} ? 　　非复合报表中的嵌套报表不可使用getchild取得，也不可使用describe取得属性和使用modify更改属性，你可以调用PB未载入文档的函数来获取/更改属性，请看示例，注意多层嵌套时使用循环获取最终对象. ? ? 非复合报表中的嵌套报表不可使用getchild取得，也不可使用describe取得属性和使用modify更改属性， ? 你可以调用PB未载入文档的函数来获取/更改属性，请看示例，注意多层嵌套时使用循环获取最终对象. ? ? ? 例：数据窗口控件dw_test包含嵌套报表dw_1,dw_1有栏位dept_name. ? ? 　　例：数据窗口控件dw_test包含嵌套报表dw_1,dw_1有栏位dept_name. ? {code} ? dwobject ldwo_parent,ldwo_obj ? string ls_color ? ldwo_parent = dw_1.Object ? ldwo_obj = ldwo_parent.__get_attribute(dw_1,false) ? ldwo_obj = ldwo_obj.Object ? ldwo_obj = ldwo_obj.__get_attribute(dept_name,false) ? ls_color = ldwo_obj.color//取颜色 ? ldwo_obj.__set_attribute(color,rgb(192,192,192))//更改颜色 {code} ? ?