数据库

位置:IT落伍者 >> 数据库 >> 浏览文章

PB中消息对话框的居中显示[2]


发布日期:2020年04月06日
 
PB中消息对话框的居中显示[2]
函数实现部分

实现窗口居中显示的函数是自定义类用户对象ccuo_thread的对象函数of_center其实现代码如下

ccuo_threadof_center ( String lpclassname String lpwindowname Ulong dwtimeout ) return Boolean

//lpclassname 消息对话框的类名(#

//lpwindowname 消息对话框的标题

//dwtimeout 超时计数

Ulong lul_hwnd //存放消息对话框的句柄

Ulong lul_start //计时开始时刻的值

lul_start = GetTickCount ( ) //计时开始

do

//查找顶层窗口

lul_hwnd=FindWindowA ( lpclassname lpwindowname )

//找到顶层窗口后跳出循环

if lul_hwnd <> then exit

//判断是否已超时

loop while GetTickCount( )-lul_start< dwtimeout

//没有找到消息对话框

if lul_hwnd = then

return false

else

//对话框居中

return of_center ( lul_hwnd )

end if

of_center的重载函数代码如下

ccuo_threadof_center ( Ulong hwndp Ulong hwndc )

return Boolean

//hwndp父窗口的句柄值为时认为是桌面

//hwndc子窗口的句柄

int li_x //窗口的X坐标

int li_y //窗口的Y坐标

[] [] []

               

上一篇:PB中消息对话框的居中显示[3]

下一篇:PB中消息对话框的居中显示[1]