在PB中巧妙运用下拉数据窗口实现代码录入.pdfVIP

在PB中巧用下拉数据窗口

PowerPB了下拉数据窗口(DropDownDataWindow)，使数据窗口更灵活、更方便。在用数据窗

口进行数据录入时，经常要用到代码录入，即对经常输入的某些值设置代码，录入时直接录入代码即可。

例如，有两个表，主表main_table和代码表code_table，录入时主表中需要代码表中的数据，但不允

许录入不在代码表中的数据。下面介绍如何使用下拉数据窗口实现上述功能。

静态设计下拉数据窗口

___

首先对主表和代码表设计两个数据窗口dwmain和dwcode，ainid

其中dwm包括字段、

_

name、、city和unit；dwcode包括字段code和data。假设unit字段有几个常用值可使用代码

_

录入，则在设计dwmain时，用鼠标字段unit，在下拉菜单中选择Properties...（属性），

则系统会弹出unit列的属性框；在其中选择Edit（编辑）项，并在Style（风格）下拉列表框中选

择DropDownDW项；然后在下面的Options（选项）框中作具体的选项配置：在DataWindow下拉

_

框中选择已设计好的代码数据窗口dwcode作为下拉数据窗口；在DisyColumn（显示列）下拉框

中选择code字段；在DataColumn（数据列）下拉框中选择data字段，这表示显示的是code字段的

_

内容，而实际存于表maintable中的是data字段的内容。至此，数据窗口设计完毕。

_

设计完数据窗口后，需要建立一个数据录入的窗口（window），名字为winput；在窗

_dw_1，其属性DataWindowObjectName设为

口winput上建立一个数据窗口的控件

__

dwmain，并在winput的open中写入下列语句：

dw_1.SetTransObject(SQLCA)

dw_1.Retrieve()

这样，在执行此窗口时，在unit字段上就会出现一个下拉列表框，列出了表code_

table中的所有内容，用户可以用鼠标选择录入。

动态改变SQL语句_

在上面的例子中，如果表maintable中的字段city也需要代码录入，则还需为city字

段新建一个表，这样很，因为有几个字段需要代码，就需要有几个表与之对应。我们可以

_

利用下拉数据窗口的一些特点来解决这一问题。可以相应地修改表codetable的结构，加一

个字段field(char(30)),以需要代码的字段名,这样,就可以利用SQL语句对之进行检索,以得

_

到某字段的所有代码。具体实现如下:重新设计数据窗口dwcode,把field字段加上并使其不可见

因为用户不需要_ain_的设置同上,只是在

（见到该字段的内容），数据窗口wm和窗口winput

d

数据窗口dw_1eocuhanged中,加入如下代码:

中需要进行一些编程。在ItmFsC