dbgutils.kb 的例行程序


DbgCloseOutputWindow

文件名

dbgutils.kb

语法

DbgCloseOutputWindow;

参数

返回

副作用

说明

此函数关闭调试输出窗口(如果存在的话)。

调用的对话框窗体


DbgCommonWrite

文件名

dbgutils.kb

语法

DbgCommonWrite(VAL bitmask:INTEGER, REF debugData:DbgDataRec, VAL str:STRING, VAL newLine:BOOLEAN, VAL strColor:INTEGER);

参数

debugData - 调试数据结构(具有 win 句柄等等)

str - 要写入日志的字符串

newLine - 在字符串结尾写一行新字符

strcolor - 字符串的颜色

返回

一种颜色

副作用

说明

此函数将所提供的字符串写入调试日志窗口(如果有这种窗口)或调试文件(如果有这种文件)。如果 newLine 标志是 true,则该函数在字符串结尾写一行新字符。(此函数由 DbgWrite 与 DbgWriteLn 使用。)

调用的对话框窗体


DbgEvent

文件名

dbgutils.kb

语法

DbgEvent

参数

返回

副作用

说明

此例行程序为滚动“调试日志”窗口提供最少量的事件处理。

调用的对话框窗体


DbgEventName

文件名

dbgutils.kb

语法

DbgEventName(VAL msgCode:INTEGER, REF msgString:STRING, REF msgColor:INTEGER);

参数

msgCode - $Msg 常量(来自 $Event)

msgString - 此 $Msg 常量的字符串名称

msgColor - 此事件类型的前景颜色

返回

-1 = 未知 msg 代码

(其他值) = 成功

副作用

说明

此函数将所输入的消息常量转换为可打印的字符串。

调用的对话框窗体


DbgEventOutput

文件名

dbgutils.kb

语法

DbgEventOutput(VAL bitmask:INTEGER, VAL winHandle:WINDOW, VAL fieldname:STRING);

参数

bitmask - 指示产生输出之前要检查的调试输出向量中的位。

如果有任何匹配,则执行输出。

winhandle - 接收事件的窗口

winEvent - 要输出的事件(以 $MsgXxx 格式输出)

返回

副作用

说明

此函数执行事件处理器的调试输出。输出目的地(文件、滚动窗口、stdout 或没有目的地)由此模块的配置(通过调用 DbgInitialize 设置的)确定。

调用的对话框窗体


DbgInitialize

文件名

dbgutils.kb

语法

DbgInitialize(VAL filename:STRING, VAL parentwindow:WINDOW, REF menuBar:LIST OF STRING, VAL applicationName:STRING, VAL outputFlags:INTEGER, VAL controlFlags:INTEGER);

参数

filename - 要接收输出的文件名(如有的话)

parentWindow - 输出窗口的父窗口(如有的话)

applicationName - 应用程序(输出流)的名称

outputflags 与 controlflags - 调试函数控制标志

返回

1 = 成功,适当的输出通道已打开并待用。

2 = 成功,没有输出通道打开(按请求要求的那样)。

0 = 失败,环境变量“DEBUGON”未定义。

其他 = 错误

副作用

某个文件或某个窗口可能被打开

说明

此函数初始化调试子系统。

调用的对话框窗体


DbgOpenOutputWindow

文件名

dbgutils.kb

语法

DbgOpenOutputWindow(VAL parentwindow:WINDOW);

参数

parentWindow

返回

1 = 成功

2 = 已经存在(已确保它是可见的)

-1 = 首先调用 DbgInit 失败

-n = 来自 CreateScrollWindow 的失败代码

副作用

说明

如果不存在调试输出窗口,则此函数创建一个调试输出窗口。它试图使一个现有的窗口处于屏幕的顶层。

调用的对话框窗体


DbgWrite

文件名

dbgutils.kb

语法

DbgWrite(VAL bitmask:INTEGER, VAL str:STRING);

参数

bitmask - 指示产生输出之前要检查的调试输出向量中的位。

如果有任何匹配,则执行输出。

str - 要写入输出的字符串

返回

副作用

说明

此函数执行调用例行程序的调试输出,但不以新行终止输出。请参见 DbgWriteLn,以了解详细说明。

调用的对话框窗体


DbgWriteLn

文件名

dbgutils.kb

语法

DbgWriteLn(VAL bitmask:INTEGER, VAL str:STRING);

参数

bitmask - 指示产生输出之前要检查的调试输出向量中的位。

如果有任何匹配,则执行输出。

str - 要写入输出的字符串

返回

副作用

说明

此函数执行调用例行程序的调试输出。输出目的地(文件、滚动窗口、stdout 或没有目的地)由此模块的配置确定。

调用的对话框窗体


NextStrColor

文件名

dbgutils.kb

语法

NextStrColor(REF colorData:ColorRec);

参数

colorData - 颜色列表数据结构

返回

一种颜色

副作用

说明

此函数返回颜色循环列表中的下一种颜色。它的目的是用于写例行程序,以便为将写入屏幕的各行提供对比。

调用的对话框窗体