Ranyoo的专栏

昨天晚上加班的时候遇到一个问题，大致要实现以下内容：1.数据窗口控件：dw_1、dw_2；2.如果dw_1得到光标，那么{dw_2.visible = true} ；3.如果dw_1 失去焦点，那么：如果dw_2得到光标，{dw_2.visible = true} ；如果dw_2也没有得到光标，{dw_2.visible = false} 。看起来很简单的样子(实际上也很简单)，但

int li_loop,li_num    //如果int类型不够用，可以声明为long类型string ls_str,ls_ch//从字符串的第一个字符到最后一个字符，循环For li_loop = 1 to Len(ls_str)    //一个一个地取出来，然后判断   ls_ch = Mid(ls_str,li_loop,1)    //如果该字符为汉字(ascii码大

       retrievestart事件：如果该事件的返回值为2，那么在retrieve以后，不会清空数据窗口里原来的记录，而是将新记录追加到原来的记录后面(刚学pb的时候从书上看到的，分享一下)。       retrieverow事件：如果在数据窗口中retrieve数据时，想要实现在每检索出一条记录后就进行处理，然后检索下一条记录，然后再处理，然后再检索一条数据……      

      在列的color属性中，输入如下表达式：      IF (column_name column_name.Original, RGB(255, 0, 0), RGB(0, 0, 0))。　　在这个条件中，如果此列已改变，则显示红色字体，否则显示黑色字体。      这个表达式主要用column_name column_name.Original比较当前列的值和原始列的值是否相同

在窗口的closequery事件加入如下代码即可： integer li_retif dw_1.deletedcount() ＋ dw_1.modifiedcount() > 0 then   li_ret = messagebox(″注意″,″数据已经被修改，是否存盘？″,Question!,YesNoCancel!)　　   choose case li_ret　　case 1

使DataWindow中的数据只能追加新记录而不能修改原来的记录，可以利用column的protect 属性可以实现。将每一列的 Protect 属性设置为：If( IsRowNew(), 0, 1) ) 在代码中也可以动态修改protect属性：dw_1.Modify("column_name_here.Protect=1~tIf(IsRowNew(),0,1)") 这样，D