求助：关于取外部程序编辑框的句柄

.版本 2.子程序 取子窗口坐标句柄, 整数型, 公开, 窗口不能被遮挡.参数 父窗信隐口句柄, 整数型.参数 横坐标, 整数型.参数 纵坐标, 整数型.参数 是否用户区, 逻辑型, 可空.局部变量 坐标, rect坐标 ＝ 窗口取位置和大小 (父窗口句柄, 是否用户区)横坐标 ＝ 坐标.左边 ＋ 横坐标纵坐标 ＝ 坐标.顶边 ＋ 纵坐标返回 (WindowFromPoint (横坐标, 纵坐标)).版本 2.子程序 窗口取位置和大小, rect, 公开.参数 临时句柄, 整数型.参数 是否用户区, 逻辑型洞顷, 可空, 真则纳坦陆取用户区大小.局部变量 矩形, rect.局部变量 坐标, 坐标.判断开始 (是否用户区) GetClientRect (临时句柄, 矩形) 坐标 ＝ 窗口取用户区位置 (临时句柄) 矩形.左边 ＝ 坐标.横 矩形.顶边 ＝ 坐标.纵.默认 GetWindowRect (临时句柄, 矩形).判断结束矩形.宽度 ＝ 矩形.宽度 － 矩形.左边矩形.高度 ＝ 矩形.高度 － 矩形.顶边返回 (矩形)

您正在看的Powerbuilder教程是:在PB中调用外部尘迅程序并判断其运行结束

在PB中经常要调用外部程序并等待此程序运行结束后显示相关信息 如我们要备份Adaptive Server Anywhere 数据库 在备份结束后显示 备份完成！ 的提示信息 如果在调用备份铅虚程序dbbackup后马上用messagebox显示提示信息 那派激此么程序运行时则会出现这种情况 dbbackup备份程序还在运行 备份完成！ 的提示就已经显示了 显然不符合我们的设想 对于这种情况 我们可以借助API函数FindWindowA() IsWindow()和PB本身函数yield()来解决

声明API函数

Function long FindWindowA (String lpClassName String lpWindowName ) Library user dll Function boolean IsWindow (Long hwnd ) Library user dll

调用

ulong ll_handle int li_loop

SetPointer(HourGlass!) //设置鼠标指针 //运行备份数据库程序dbbackup 并使其最小化 run( dbbackup c ~ uid=dbapwd=sqldbf=D:\Sybase\Adaptive Server Anywhere \asademo db~ d:\backup Minimized!)

lishixinzhi/Article/program/PB/201311/24551

---