在powerbuilder中使下拉列表框可以和数据关联

在powerbuilder中使下拉列表框可以和数据关联

(加入日期:2002-4-20)

保存文章至硬盘】【打印文章】【字体:

分享到: 0
  在从事使用powerbuilder进行数据库开发的过程中,常常碰到要使用列表框来选择数据,但是普通的下拉列表框并没有提供和数据相连接的方法,而使用数据窗口的子下拉列表框来代替又显得有些别扭.下面介绍一种好看又好用的方法.
  可能大家已经想到了吧,使用指针把要连接的数据一条一条地从select 语句的查询结果中fetch 出来,然后再把数据additem到下拉列表框中去.
  虽然这也是一种可行的方法,但是他的速度很不能令人满意,太受数据量的影响.
  我们可以利用powerbuilder 最推崇的数据窗口技术作为数据库和下拉列表框连接的桥梁,这种方法即方便快速又安全可靠.
好了,下面制作的下拉列表框,在完成之后会带给你许多意想不到的方便!

一. 打开powerbuilder的"select user object"画笔,选择<new>, 在"new user object"中选择"Visual"类的"Standard"项并按下<ok>, 在弹出来的"Select Standard Visual Type"对话框中选择列表中的 "dropdownlistbox"项并按下<ok>. 接着加入一些实例变量,选择"Declare"菜单项的"Instance Variables.."
加入变量的声明: datastore ids_user int il_row 并按下<ok>.
我们要对新的对象进行一些限制,在对象的"constructor"事件中加入 程序:
sorted = false //这句非常必要
reset()

二. 好了,现在到了最关键的时候了,我们要把数据检索出来放到ids_user
变量里.
选择菜单"Declare"项的"User Object Function",在弹出来的对话框
中按下<new>新建一个对象函数命名为:
init
参数有一个:
sqlstr string
返回值为整型:integer
现在我们需要动态地创建datastore
在init函数中写下:
//integer init(sqlstr string) 开始
long ll_rowcount
long ll_row
string ls_sql
string errors
string ls_return
ids_user = create datastore
//根据sql语句产生数据窗口
ls_return = sqlca.SyntaxFromSQL(sqlstr, 'style(type=grid)',errors)
//sql语句有错误
if len(errors) > 0 then
messagebox('错误', errors)
return -1
end if
//根据语法动态创建数据窗口
ids_user.create(ls_return)
ids_user.settransobject(sqlca)
ll_rowcount = ids_user.retrieve()
//无数据返回
if ll_rowcount=0 then
return -1
end if
//把数据插入控件
for ll_row = 1 to ll_rowcount
this.additem(string(ids_user.Object.Data[ll_row,1]))
next
//成功返回0
return 0
//integer init(sqlstr string) 结束

现在下拉列表框已经能显示数据了,但是我们在选择数据的同时往往
需要的不是它显示出来的值,比如显示的是人员姓名,而我们需要的
是工号,难道再使用select语句把需要的数据检索出来吗?有了下面的
程序,我们就不必头痛了.
重复上面建立函数的步骤,新建一个名为getdata的user object函数,
返回值为"any"并在函数中写下程序:
//any getdata() 开始
any la_return
long ll_row
if text = '' then
return ''
end if
//没有选择或没有检索到数据
if ids_user.rowcount() = 0 or il_row = 0 then
return ''
end if
//在缺省情况下返回第二列的数据
la_return = ids_user.Object.data[il_row, 2]
return la_return
//andy getdata() 结束

现在还不能返回正确的数据,还需要一个函数setidx(idx int)
程序如下:
//setidx(idx int) 开始
il_row = idx
//setidx(idx int) 结束

现在这个user object已经完成了,我们来做一下试验试一试.
新建一个应用app_test,一个窗口w_main,按照刚才的方法创
建一个user object:uo_dbdropdownlistbox,放入w_main中
在app_test的open事件中写下连接数据库的语句并加上open(w_main)
在w_main的open事件中写下:
int li_result
li_result = uo_1.init('select name, id from sysobjects')
在uo_1的selectionchanged事件中写下:
setidx(index)
messagebox('提示', "看" + string(this.getdata()))
这时我们的用户对象已经能根据选择的name返回相应的id了.
至于更多的功能,还有待powerbuilder的爱好者们不断地思考
创造了.如果还想深入讨论请和我联系:fly-back@163.com
PowerBuilder中,可以使用数据窗口对象来实现下拉列表功能。下面是一种常见的实现方法: 1. 首先,创建一个数据窗口对象,并在该对象中添加一个下拉列表控件。可以在数据窗口中的“编辑”选项中选择“添加控件”,然后在弹出的对话中选择下拉列表控件。 2. 在添加下拉列表控件后,可以通过修改该控件的属性来设置下拉列表的选项。可以在控件的属性列表中找到“下拉数据窗口”的属性,然后选择一个数据窗口对象作为下拉列表数据源。 3. 在下拉数据窗口中,可以定义下拉列表的选项。可以添加一个或多个数据窗口列来表示下拉列表的选项,然后在这些列中填写相应的选项值。 4. 完成上述设置后,可以在代码中使数据窗口对象和下拉列表控件来实现下拉列表功能。可以使用数据窗口对象的`dw_1.SetTransObject(SQLCA)`方法来设置数据窗口对象的事务对象,然后使用`dw_1.Retrieve()`方法来检索下拉列表的选项。 5. 在使用下拉列表时,可以通过调用下拉列表控件的`dw_1.GetSelectedText()`方法来获取用户选择的选项值。可以将该选项值保存到变量中,以便在后续的逻辑中使用。 这种方式利用数据窗口对象实现下拉列表功能,可以方便地管理和维护下拉列表的选项,并且具有良好的可扩展性和可重用性。此外,PowerBuilder还提供了其他方式来实现下拉列表功能,例如使用下拉列表控件或自定义绘图控件等。
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值