lenya

2010年10月23日

摘要： sybase未公开的设置ToolBar字体大小的函数:function long SetToolBarFont(long unknown,string fontname,long fontsize,long unknown1,string str) library "pbvm90.dll" alias for "FN_ToolBarSetFont" 阅读全文

posted @ 2010-10-23 10:43 lenya 阅读(209) 评论(0) 推荐(0) 编辑

pb的catch怎么用?

摘要： //pb的catch怎么用?1.catch(throwable ex)2.Choose Lower(ClassName(lany_my)) Case 'string' Try ls_list = lany_my Catch(runtimeerror runx) ls_list[1] = lany_my End Try Case Else End Choose 阅读全文

posted @ 2010-10-23 10:43 lenya 阅读(481) 评论(0) 推荐(0) 编辑

DataWindow如何彻底禁止鼠标滚轮滚动到下一条或上一条记录

摘要： DataWindow如何彻底禁止鼠标滚轮滚动到下一条或上一条记录:方法一:other事件写 if message.number = 522 then return 1方法二:(个人觉得这种方法更好.)ue_vscroll，Event ID: pbm_vscroll 事件代码：return 1 阅读全文

posted @ 2010-10-23 10:39 lenya 阅读(170) 评论(0) 推荐(0) 编辑

This tip shows how to extract the width and height from a bitmap source file on disk.

摘要： This tip shows how to extract the width and height from a bitmap source file on disk.// Width and height of a picture inside a BMP fileint jobblob bulong width, heightjob = FileOpen( "filename.bmp", StreamMode!, Read! )FileRead( job, b )width = Long( Integer( BlobMid( b, 19, 2 ) ), & I 阅读全文

posted @ 2010-10-23 08:25 lenya 阅读(151) 评论(0) 推荐(0) 编辑

事务的执行流程

摘要： --事务的执行流程--1、执行identity insert检查--2、检查为空性约束--3、检查数据类型--4、执行instead of触发器--5、检查主键约束--6、检查check约束--7、检查外部键约束--8、执行DML语句，并更新事务日志--9、执行after触发器--10、提交事务--11、写入数据文件阅读全文

posted @ 2010-10-23 08:20 lenya 阅读(297) 评论(0) 推荐(0) 编辑

在数据窗口过滤以后,计算列值如何才能一起改变?

摘要： dw_1.filter() dw_1.groupcalc() 阅读全文

posted @ 2010-10-23 08:17 lenya 阅读(113) 评论(0) 推荐(0) 编辑

SQL Select语句完整的执行顺序：

摘要： SQL Select语句完整的执行顺序： 1、from子句组装来自不同数据源的数据； 2、where子句基于指定的条件对记录行进行筛选； 3、group by子句将数据划分为多个分组； 4、使用聚集函数进行计算； 5、使用having子句筛选分组； 6、计算所有的表达式； 7、使用order by对结果集进行排序。阅读全文

posted @ 2010-10-23 08:17 lenya 阅读(188) 评论(0) 推荐(0) 编辑

2010年10月21日

除了循环以外，有没有更好的方法统计数据窗口中处于选中状态的行数？

摘要：除了循环以外，有没有更好的方法统计数据窗口中处于选中状态的行数？方法一： 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.O 阅读全文

posted @ 2010-10-21 16:45 lenya 阅读(141) 评论(0) 推荐(0) 编辑

保存datawindow数据到excel中

摘要： // ... Init docname // ... GetFileOpenName or any other methodif dw_1.SaveAs(docname, HTMLTable!, True) = -1 then MessageBox("Warning", "Unable to export data. Error writing to file!", Exclamation!)return end if // Convert HTML file to Excel native format OLEObject excel excel = 阅读全文

posted @ 2010-10-21 16:40 lenya 阅读(215) 评论(0) 推荐(0) 编辑

分组行号

摘要：怎样对分组里的行加上序号，要求每个组里行的序号从1开始！ --------------------------------------------------------------- 用计算域，放在明细区： getrow() - first(getrow() for group 1) + 1 --------------------------------------------------------------- first(getrow() for group 1) 可以取得每一组的第一行的行号 --------------------------------------------- 阅读全文

posted @ 2010-10-21 16:39 lenya 阅读(1185) 评论(0) 推荐(0) 编辑

公告