PowerBuilder相关开发操作总结.docVIP

Peterevanss Development Notes 数据窗口中点击相同行同时选中: Long i String ls_testno DateTime ldt_opstime IF row = 0 Or IsNull(row) THEN This.SelectRow(0,False) RETURN END IF IF row = GetSelectedRow(0) THEN RETURN This.SelectRow(0,False) ls_Test_No = This.GetItemString(row,pat_master_index_inp_no) ldt_opstime = This.GetItemDateTime(row,operation_schedule_scheduled_date_time) FOR i = This.RowCount() To 1 Step -1 IF This.GetItemString(i, pat_master_index_inp_no) = ls_Test_No And This.GetItemDateTime(i, operation_schedule_scheduled_date_time) = ldt_opstime THEN This.SelectRow(i,True) END IF NEXT 创建数据通道语句: datastore lds_ops lds_ops = Create datastore lds_ops.DataObject = d_schedule_arrange lds_ops.SetTransObject(sqlca) 在已过滤后的数据基础上对datawindow进行过滤 dw_1.setfilter(dw_1.describe(datawindow.table.filter)+your_join+your_new_filter) dw_1.filter() 在datawindow中显示动态时间 建立一个计算域，表达式为string(datetime(today(),now()),yyyy年mm月dd日 hh点mm分ss秒),同时设置datawindow的属性dw_1.Object.DataWindow.Timer_Interval=500 在数据窗口中只显示不同的数据 dw_1.filter(isnull(columnname[-1]) and columnnamecolumnname[-1]) dw_1.filter() 统计数据窗口中处于选中状态的行数 方法一： long ll_Selected ll_Selected = long(dw_1.describe(evaluate(sum( if(IsSelected(), 1, 0) for all),1))) 方法二： long ll_Selected ll_Selected = long(dw_1.describe(evaluate(count(IsSelected() for all),1))) 方法三：upperbound(dw_1.Object.Data.Selected) 在数据窗口中选定想要打印的几条记录 long ll_posdataStore lds_dslds_ds = create dataStorelds_ds.dataObject = dw_1.dataObjectfor ll_pos = 1 to dw_1.rowCount()???? if dw_1.IsSelected(ll_pos) then?????????????? dw_1.RowsCopy(ll_pos,ll_pos,Primary!,lds_ds,lds_ds.rowCount()+1,Primary!)???? end ifnextlds_ds.print() 单击编辑框选中其中内容 自定义事件ue_clicked，代码是：this.selecttext(1,len(this.text))，getfocus事件的代码改为：This.Post Event ue_clicked()。得到字符串中汉字的个数For i = 1 to Len(aString) ????????? ls_ch = Mid(aString,i,1) ????????? If Asc(ls_ch) = 128 then //是汉字 ????????????????? li_num++ ????????????????? i = i+1 ????????? End if Next??li_num就是汉字的个数双击标题进行排String ls_old_sort,ls_colum