POWERBUILDER常见问题汇总.pptx

POWERBUILDER常见问题汇总 POWERBUILDER数据类型转换表 获得应用程序所在目录 利用API函数GetModuleFileNameA即可获得应用程序所在目录 但是该函数在PB开发环境中运行时返回的是PB60 exe所在的目录 在编译后的可执行文件运行时才返回应用程序所在目录 那么如何得知程序是在开发环境中运行还是编译后的可执行文件呢 可以根据Handle getapplication 的返回值来判断 等于0时程序运行在开发环境中 非0则是编译后的可执行文件 FunctionuintGetModuleFileNameA ulonghModule refstringlpFilename ulongnSize Library kernel32 dll stringls Buffer Space 255 IFHandle GetApplication 0THEN 已编译GetModuleFileNameA Handle GetApplication ls Buffer 255 ENDIF 将指定的窗口带至窗口列表顶部 在应用程序中有时我们需要用Bringwindowtotop将指定的窗口带至窗口列表顶部 倘若它部分或全部隐藏于其他窗口下面 则将隐藏的部分完全显示出来 但是在某些情况下这个函数并不能达到我们想要的效果 倘若某窗口并非前台应用程序的一部分 那么一旦随同该窗口调用本函数 仍会将窗口带至它自己那个应用程序的窗口列表顶部 但是 不会同时使那个应用成为前台应用程序 这意味着在调用了本函数后 窗口仍会保持隐藏状态 那么如何使应用成为前台应用呢 我们可以使用SetForegroundWindow函数 例如 FUNCTIONlongFindWindowA ulongWinhandle stringwintitle Library user32 FUNCTIONulongSetForegroundWindow ulonghwnd LIBRARY user32 dll longll winhandlell winhandle FindWindowA 0 test ifll winhandle 0thenSetForegroundWindow ll winhandle endif 退出时候直接关闭系统 为方便用户 有时需要在应用程序中增加退出并关闭计算机的功能 其实只要几行代码即可实现 首先声明API函数 FunctionlongExitWindowsEx longuFlags longdwReserved Library user32 然后在程序中调用 ExitWindowEx 1 0 参数型及说明 uFlagsLong 指定下述一个或多个标志 用OR运算符合并到一起 EWX FORCE强迫中止没有响应的进程EWX LOGOFF中止进程 然后注销EWX SHUTDOWN关掉系统电源 如果可能的话 ATX电源就可以 EWX REBOOT重新引导系统EWX SHUTDOWN关闭系统dwReservedLong 保留 设为零 Windows风格的About对话框 利用Api函数ShellAboutA可以显示一个与Windows操作系统风格一致的About对话框 首先声明如下外部函数 functionintShellAboutA ulongal hWnd stringas szApp stringas szOtherStuff ulonghIcon library shell32 Script如下 ShellAboutA handle parent WindowTitle moretext Stillmoretext 0 其中 WindowTitle窗口标题moretextStillmoretext你自己的说明 限制应用程序只运行一次 1 声明外部函数如下 FUNCTIONuLongShowWindow ulongwinhandle intwincommand Library user32 FUNCTIONuLongBringWindowToTop ulongHWND Library user32 FUNCTIONlongFindWindowA ulongWinhandle stringwintitle Library user32 2 创建一个窗口 w test 将title设置为 TestWindow 3 在application的Open事件中加入如下代码 longll winhandlell winhandle FindWindowA 0 TestWindow Ifll winhandle 0ThenBringWindowToTop ll winhandle ShowWindow ll winhandle 5 ReturnEndIfOpen w test 数据管道 数据管道主要可以完成以下几个功能 数据库之间数据的传送修改表的结构 象主键标 是否可为NULL等我们在Pipeline画板中创建一个管道对象时 必须说明以下这些参数 SourceConnection源数据库DestinationConnection目的数据库DataSource源表Table目的表Option管道操作其中管道操作方式有 Create 添加表 表不能存在 Replace 删除再添加表 表可以存在Refresh 删除再插入行Append 插入行Update 更新 插入行管道对象属性 RowsInErrorLong管道中发现的错误的行数RowsReadLong管道已读取行数RowsWrittenLong写入数据库的行数DataObjectString管道对象名SyntaxString建立管道对象的语法字符串管道对象函数 CancelInteger中止管道执行ClassNameString返回用户对象的名称GetParentPowerObject返回父对象的名称PostEventBoolean在用户对象的消息队列末增加一个事件RepairInteger修正目的数据库StartInteger执行管道TriggerEventInteger送一个事件到用户对象并执行事件脚本TypeOfObject返回用户对象的类型 数据管道 实现数据管道要完成以下几步 1 创建Pipeline类型的标准不可视用户对象p pipe meter2 在Pipeline中创建一数据管道 作为第5步的DataObject 3 创建一窗口 带一数据窗口控件PipeError和命令按钮 4 在OPEN事件中创建一p pipe meter类型的iu PipeLine实例变