给顶层表单添加工具栏

1.在类库MyVcx中建立一个工具栏类MyToolBar,将工具栏的ShowWindow属性设置为1——最上层表单; 2.给顶层表单添加一个自定义属性TopToolBar; 3.编辑顶层表单的Activate event,输入以下代码: This.TopToolBar=NewObject("MyToolBar","MyVcx") This.TopToolBar.show() This.TopToolBar.dock(0) 现在,你就可以享受顶层表单的工具栏了!
表单(Form)问题 | 2016-05-18 08:38 | 12488次阅读 | 0评

行(列)记录的最大值

create cursor tt (a1 i,a2 i,a3 i,a4 i,a5 i,a6 i,a7 i,a8 i,a9 i,a10 i,a11 i) rand(-1) for lnI=1 to 11 append blank nzds=0 for lnJ=(lnI-1)11+1 to lnI11 nzds=nzds+1 replace (field(nzds)) with lnJ*rand() endfor endfor ...
数据表问题 | 2016-05-16 21:13 | 12128次阅读 | 0评
浏览172847次
最新评论