还剩5页未读,继续阅读
文本内容:
数据窗口绝对技巧PB、如何让存储文件目录的列,显示图片?1选择对应的的属性为column displayas picturetrue、如何复制类型的所选择的行的数据到系统剪切板?2gridstring ls_selectedls_selected=dw_
1.Object.DataWindow.Selected.Dataclipbordls_selected如何改变数据窗口列位置新手常见3GRID先然后在预览窗口拖动位置即可preview,、如何设置的底色?4DW在的中改变的值DW editsourcecolor、如何将风格改成自由格式?5Grid在的中将的改为DW echtsourceprocessings
10、要新建一个表但风格和现有表风格一样,怎么将表快速设置成表风格?6A BA B复制表在表的中的中将表名和字段名改成表的,即可B C,C DWedtsource A、如何实现风格的的多栏表头?7gird datawindow添力「至【带区,并设置属性为保存,修改text Jheader bandforeground editsource text的和属性表达式如下x widthx=100~t integerdescribe,firstcol.xn width=H1OO-tintegerdescribelastcol.x-integerdescribe,firstcol.x,+integerdescribe1astcol.width
1、如何过滤编辑风格的显示值为指定值的记录?8dddwdw_
1.setfilter,,lookupdisplay,column_name,=,,+ls_display_value_your+Hdw_
1.filter、如何设置的某一列为空?9datawindowstring ls_temp[]setnullls_tempdw_
1.object.columnname.primary.current=ls_temp如何设置的单双行不同颜色间隔?10^datawindow在带区的属性表达式中写上讦detail colormod getrow,2=1,rgb255,0,0,rgb0,25如果是当前行以第三种颜色表示,表达式如下5,0,ifgetrow=current rgb2550,0Jfm53odgetrow,2=1rgbO,0,255,rgb0,255,
05、如何获取指定名称的11datawindowobjectDWObject ldwo_use,ldwo_abc ldwo_use=dw_
1.Object ldwo_abc=ldwo_use.__get_attributent_1,FALSE//t_1datawindow中text对象的名称>如何缩放的打印大小?12datawindowdw_
1.object.datawindow.zoom=150or dw_
1.object.datawindow.zoom=
75、如何在已过滤后的数据基础上对进行过滤?13datawindowdw_
1.setfilterdw_
1.describeHn+yourjoin4-your_new_filterdw_
1.filter、如何在中显示动态时间?14datawindow建立一个计算域,表达式为;月日点分stringdatetimetoday,now yyyymm ddhh mm秒,同时设置的属性ssdatawindow dw_
1.Object.DataWindow.Timer_lnterval=
500、如何让带用的控件的标题栏呈活动窗口的颜色?15title bardatawindow外部函数定义funcation lognSetActiveWindowlong hwndLibrary,,user
32.dir,控件的事件代码datawindow clickedsetactivewindowhandlethis、如何设置的当前行指示图标?16datawindow在中建立一个计算列,为“,并将该计算列挪移为的第datawindow expressiondatawindow一个列,在控件的事件中写入代码datawindow rowfocuschanged或者为窗口上的控件名SetRowFocuslndicatorhand!setrowfucsindicatorp_1//p_1picture、如何通过代码打开17dddw定义外部函数引用声明SUBROUTINE keybd_event intbVk,int bScan,int dwFlags,int dwExtralnfo LIBRARY,,user
32.dlln代码如下constant integerVK_F4=115dw_
1.SetFocusdw_1,SetColumn ndept_headjdn//设置当前dddw按下键keybd_event VK_F4,0,0,0//F4释放键keybd_event VK_F4,0,2,0//F
4、如何打印的内容到文件中?18datawindowdw_
1.object.datawindow.print.fileName=nc:\temp.prnndw_
1.print、如何设置的初始值?19dddwdw_
1.object.columnname.lnitial=^^yourJnitial_value^^、如何只显示不同的数据?20dw_
1.filternisnullcolumnname[-1]and columnnamecolumnname[-1]*、如何让带有的不可以挪移?21Htlebar datawindow在的自定义事件中写入如下代码datawindow ue_nc%ttestpbm_ncMttest Ireturn
1、如何在显示风格中建立基于第栏中的列的计算列?22N4JP N如有两列,和并显示为两栏,则第一栏的计算列的为column numberprice,cost expression第二栏的计算列的为number*price,cost_1expression number
[1]*price
[1]、如何清空或者中项目?23ddlb edit.codetabledw_
1.Object.columnname.Values=,,n、如何实现指定的的字体旋转度?24column90dw_
1.object.columnname.font.Escapement=900”、如何获取的代码?25datawindow sql可以通过以下四种方法获取代码sqlstring szselectszselect=dw_
1.describedatawindow.table.selectszselect=dw_
1.describenMszselect=dw_
1.describeHdatawindow.table.select.attribute1szselect=dw_
1.getsqlselect、如何获取对象占有的虚拟存储的容量?26datawindow使用属性datawindow.storage举例在控件的事件中,写入如下代码datawindow retrieverowlongIstoragelstorage=longdw_
1.object.datawindow.storageif lstorage50000then dbcancel、如何连续在同一张纸打印两个数据窗口?27dw_
1.object.datawindow.print.filename=,temp.prnHdw_
2.object.datawindow.print.filename=,temp.prnHdw_
1.printdw_
2.print、如何设置分组后每一个分组中的记录号?28datawindow建立一个计算歹为U,expression getrow-firstgetrow forgroup1+
1、如何实现在中惟独新增的行,才可以编辑?29datawindow在所有的的属性表达式中写入以下表达式column protect;ifisrownew071,、除了循环以外,有没有更好的方法统计数据窗口中处于选中状态的行数?30普通习惯于使用循环来统计数据窗口中处于选中状态的行数,有没有更好的方法?其实此问题在应用上用处不大,讨论一下,活跃一下思维还是有好处的方法一long ll_Selectedll_Selected=longdw_
1.describe,evaluate,sum iflsSelected,1,0for all\1方法二long ll_Selected方法三ll_Selected=longdw_
1.describee*evaluatecountlsSelected forall\1upperbounddw_
1.Object.Data.Selected、怎么让只打印当前记录,是用格式制作的数据窗口!31PB FreeDataStoreldt_temp long ll_Row,ll_Rows ll_Rows=dw_XX.RowcountIf ll_Rows=0Then GoTothe_endIf ll_Rows=1Then dw_XX.Print GoTothe_endEnd ifdw_XX.SetRedraw Falseldt_terrip=Create DataStoreldt_temp.DataObject=dw_XX.DataObject ll_Row=dw_XX.GetRowdw_XX.RowsMove1,ll_Rows,Primary!,ldt_temp,1,Primary!Idt_temp.RowsMovell_Row,ll_Row,Primary!,dw_XX,1,Primary!dw_XX.Printdw_XX.RowsMove1,1,Primary!,ldt_temp,ll_Row,Primary!Idt_ternp.RowsMove1,ll_Rows,Primary!,dw_XX,1,Primary!Destroy ldt_temp dw_XX.SetRedrawT ruethe_end:只用将上述脚本拷入到打印部份即可,为被打印的型数据窗口,该方法可保证dw_XX free中的数据在打印先后包括等属性均不发生任何改变,但效率较低,不宜用在数据量dw_XX sort太大的数据窗口中,固然,考虑到打印本身速度就比较慢,所以行数据是可以采用这种方3000法并让用户接受的若在同一窗口上存在与共享的数据窗口并且与同时显dw_XX griddw_XX示,则需要与一起、字段如何自动换行的同时且自动高度?dw_one SetRedraw32o将数据窗口中相应列的为不选中,选中;将的auto horzscroll autosizeheight detailautosize选中在数据窗口后调用下面函数即可height retrieveuf_set_textdatawindow adw_content,string as_columns,boolean,ab_ignoreblank在数据窗口中,在中包含的列中插入空格Describe adw_content as_columns要操作的多个列,列间用逗号隔开Args as_columns*★************★★★★★***★***★★**★★**★★***★★★******★******★★★*★★/if notisvalidadw_content or isnullas_columns orlenas_columns1orisnullab_ignoreblankthen return-1n_cst_string lnv_stringstring ls_column[],ls_width,as_source,as_repIaced,ls_temp intli_upperbound,li_width,li_column,li_fontWidth,li_counter longll_rowcount,ll_row,ll_totalstep intli_yieldlnv_string.of_parsetoarrayas_columns,VJs_column li_upperbound=upperboundls_column11_rowcount=adw_content.rowcountif li_upperbound1or ll_rowcount1then return-1openwithparmw_waiting,this ib_cancel=false iw_frame.enabled=falsell_totalstep=ll_rowcount*li_upperboundw_waiting.uf_registerll_totalstepfor li_column=1to li_upperboundls_width=adw_content.describels_column[li_column]+n.width li_width=integerls_widthif ls_width=,!1or ls_width=or li_width=0then continueend if,//ls_temp=adw_content.describels_column[li_column]+,.Font.property{=w idth}“//messageboxls_column[li_column]+H.Font.property{=width1}n,ls_temp//return1li_fontwidth=27li_counter=li_width/li_fontWidthfor ll_row=1to ll_rowcountif ib_cancel theniw_frame.enabled=truereturn0//pressed cancelbuttonend ifas_source=adw_content.getitemstringll_rowjs_column[li_column]as_replaced=uf_insertstringas_source li_counter\false ifas_replacedas_source thenJJadw_content.setitemll_row,ls_column[li_column],as_replaced end ifw_waiting.uf_stepitnextnextclosew_waitingiw_frame.enabled=truereturn
1、如何使的列不可挪移,不可调整列宽?33dw在的事件写datawindow cilckedifrow=0then return1end if、光标跳转到数据窗口的某一行某一列34dw_
1.scrolltorowll_rowdw_
1.setcolumnll_column、如何使光标指向每页第一行?35longll_firstrowonpage=longdw_
1.describe,datawindow.firstrowonpageHdw_
1.scrolltorow ll_firstrowonpagedw_
1.setrowll_firstrowonpage、的窗口如何使第一列固定不动?36Grid
①选上的属性data OBJECTHSphtScroll
②在事件中constructordw_
1.Object.DataWindow.HorizontalScrollSplit=integerdw_
1.describen#
1.width**〃第一列的宽度
③在事件中scrollhorizontalint iifpane=1theni=integerthis.OBJECT.datawindow.horizontalscrollposition2if i1or isnullithen returnifscrollpos0thenthis.OBJECT.datawindow.horizontalScrollPosition=0end ifelsei=integerthis.Object.DataWindow.HorizontalScrollSplitif i1or isnullithen returnifiscrollpos thenthis.OBJECT.datawindow.horizontalScrollPosition2=iend ifendif、如何禁止修改数据窗口列宽度37grid在数据窗口的事件中加入Grid ClickedIfrow=0Then return
1、数据窗口改变列宽度事件38grid如果event:pbm_lbuttondown,pbm_mousemvoe,pbm_lbuttonup,在数据窗口标题栏pbm_lbuttondown getrow=0and GetObjectAtPointer=你的标题按下鼠标左键,记一个标志;,鼠标挪移了,在记一个标志;pbm_mousemvoe这时鼠标左键再判断最后一列的位置是否发生变化,如果有,_|“pbmjbuttonup up,写你的脚本、如何判断数据窗口内容是否修改39if dw_wh.deletedcount+dw_wh.modifiedcount0theninteger li_ret注意数据已经被修改,是否存盘?li_ret=messagebox“,Question!,YesNoCa ncel!endif、如何得到数据窗口鼠标光标下的控件和行40建立一个自定义事件,事件号事件有参数pbm_dwnmousemove,row dwo、数据窗口循环删除行,必须要从最后一行开始删除,如41for ll_row=dw_
1.rowcount to1step-1〃删除条件if thendw_1,deleterowll_rownext固然,也可以用加之函数实现do whilefind。