grp_dbww.kb 的例行程序


InquireGroups

文件名

grp_dbww.kb

语法

EVENT GroupMainEvent(REF group: GroupEventRecord;

参数

group - 具有事件处理器信息的记录

返回

副作用

说明

这是处理组的主要事件处理器。

调用的对话框窗体

groups.dfc[group_inquiry]

groups.dfc[workwithgroups]


InquireGroups

文件名

grp_dbww.kb

语法

FUNCTION InquireGroups(VAL parentWindow: Window, VAL msgWindow: Window, REF group: GroupEventRecord, VAL doInquiry: BOOLEAN, VAL doSelect: BOOLEAN, VAL doWorkWith: BOOLEAN REF groupWindow: WINDOW): INTEGER;

参数

parentWindow - 接收整个系统消息的主窗口

msgWindow - 消息窗口或此窗口的直接父

窗口

group - 已选择一个组时,将接受该组

信息的引用参数。

doInquiry - 显示与处理“组查询”对话框。

doSelect - 允许从处理过程选择记录

doWorkWith - 显示与处理“组处理”对话框

groupWindow -“处理组”对话框的句柄

返回

来自创建过程的对话框的上一返回

值。如果显示“处理”对话框,则该对话框

返回来自 DlgCreate() 的值,否则返回来自

查询 DlgBox() 的值。

副作用

说明

此函数用来显示与处理组“查询”与组“处理”对话框。如果查询标志是 TRUE,则该函数处理“查询”并基于所输入的值创建一个 SQL 搜索字符串。如果处理标志是 TRUE,则该函数将显示“处理”对话框,该对话框显示所有组(查询标志 = FALSE)或一系列与搜索准则“查询”屏幕相匹配的子(查询标志 = TRUE)。如果允许用户选择值,则 GroupEventRecord 将被植入该用户选择的组信息。

调用的对话框窗体

groups.dfc[group_inquiry]

groups.dfc[workwithgroups]