PowerBuilder编程俱乐部
问题一：请问在PB的数据窗口中怎样实现某一列的增量查询功能，就是说在单行编辑器控件中每输入一个字符，数据窗口能找到这一列值左边部分与单行编辑器中内容相等的行，并加亮显示。例如数据窗口是按整型字段“ID”升序排列的，用户在单行编辑器中输入1，则数据窗口滚动到ID字段第一位为“1”的第一行并加亮显示；再在1后输入0，则数据窗口滚动到ID字段前两位为“10”的第一行，依次类推。
答：增量查询功能实现的关键有两点，一是单行编辑器能实时响应键盘的输入，捕捉每一个按键，获得其中的文本；二是数据窗口的模糊查询功能，即能够找到列ID左边文本与单行编辑器文本相等的行，这可以用“like”来实现。下面给出具体方法：
1．定义单行编辑器的用户事件ue_enchange，事件的ID为：pbm_enchange。这个事件能响应键盘的输入。
2．在单行编辑器的ue_enchange事件中编写如下脚本：
long ll_found_row
string ls_find
ls_find = ″string（id） like ″ ＋ ″′″ ＋ this.text ＋ ″％′″ //查找条件（左部分与单行编辑器文本相等）
ll_found_row = dw_name.Find（ls_find， 1， dw_name.RowCount（）） //查找符合条件的行
if ll_found_row <= 0 then return
dw_name.ScrollToRow（ll_found_row） //滚动到相匹配的行
dw_name.SelectRow（0 ， false）
dw_name.SelectRow（ll_found_row ， true） //将匹配行加亮显示
问题二：ORACLE 7.3 ＋ PB，在Oracle的SQL＊PLUS中可以很容易修改表结构，但如何在PB程序中动态修改表结构？比如将某一字段的长度扩大？
答：用动态SQL语句，举例如下:
string ls_Mysql
ls_Mysql=″alter table department modify dept_name varchar2（12）″
sqlca.autocommit = true
EXECUTE IMMEDIATE :ls_Mysql;
sqlca.autocommit = false
commit;
以上脚本的作用是把表department的字符型字段dept_name长度加大到12。
这种方法还可以实现在程序中建表（将ls_Mysql的值改为″create table ...″即可 ）、删除表等操作，也适用于Sybase SQL Anywhere，MS SQL Server等数据库。
问题三：我想把用PB开发的应用的全部源代码打印出来，请问有什么工具可以实现？
答：不用其他工具，PB本身就可以做到。举个例子：要打印一个窗口的脚本，在Library画板中右键点击此窗口，选择print菜单项，里面有打印的内容：画面、窗口脚本、窗口控件脚本等，想打什么就选什么吧。
问题四：如何在菜单中触发父窗口对象中命令按钮控件的单击事件？
答：先在菜单的父窗口中定义一个自定义事件（如ue_ok，事件ID：pbm_custom01），在ue_ok事件中编写触发父窗口中命令按钮cb_ok的Clicked事件的代码：
cb_ok.trigger event（clicked!）
然后在菜单的相应事件中触发该用户事件ue_ok：
parentwindow.triggerevent（″ue_ok″）
问题五：如何在复合报表（Composite DataWindow）中引用计算域的值？
答：对于一般类型的数据窗口，我们可以用这种办法：先为计算域取名，如“count_id”，取值过程如下（除了分组的数据窗口，一般计算域都用1）：
long ll_count_id
ll_count_id = dw_1.getitemnumber（1，″count_id″）
而对于复合报表，须先用GetChild（）函数得到其中的report，再取此report中计算域的值。假设此 report name 为“report_department”（注意不要混淆report name 与子数据窗口本身的名字），计算域名为count_id，则取值过程如下：
DataWindowChild dwc_child
long ll_count_id
dw_1.GetChild（″report_department″， dwc_child）
ll_count_id = dwc_child.getitemnumber（1，″count_id″）
问题六：在用PB6.5编程序时发现PB6.5中没有反三角函数，请问怎么办？
答：确实如此，PB中只提供了三角函数如sin（）、cos（），要想使用反三角函数须借助于数据库。一般数据库如Sybase SQL Anywhere、MS SQL SERVER等都提供反三角函数，使用方法select 函数名（参数） into 变量 ……如在Sybase SQL Anywhere 5 中：
double ldb_value
SELECT asin（″search″.″id″）
INTO :ldb_value
FROM ″search″
WHERE ″search″.″id″ = 1;
实现了对数据库字段的反三角计算，如果是对一般的内存变量的反三角计算可用变通的办法（此方法由网易PB版主edsion提供）：
double ldb_value = 1
double ldb_asin
SELECT asin（ :ldb_value ）
INTO :ldb_asin
FROM ″department″ ;