本篇內(nèi)容介紹了“PB中消息對話框的居中顯示方法是什么”的有關(guān)知識,在實際案例的操作過程中,不少人都會遇到這樣的困境,接下來就讓小編帶領大家學習一下如何處理這些情況吧!希望大家仔細閱讀,能夠?qū)W有所成!
創(chuàng)新互聯(lián)專注于犍為企業(yè)網(wǎng)站建設,響應式網(wǎng)站,商城開發(fā)。犍為網(wǎng)站建設公司,為犍為等地區(qū)提供建站服務。全流程按需網(wǎng)站設計,專業(yè)設計,全程項目跟蹤,創(chuàng)新互聯(lián)專業(yè)和態(tài)度為您提供的服務SharedObject系列函數(shù)
和共享對象有關(guān)的函數(shù)包括:SharedObjectRegister、SharedObjectGet、SharedObjectUnregister和SharedObjectDirectory函數(shù)。
首先,用SharedObjectRegister函數(shù)初始化共享對象,并建立一個單獨的線程。如:
SharedObjectRegister (“ccuo_thread” ,“thread1” )
其中ccuo_thread是一個共享的自定義類用戶對象的類名,thread1是共享對象實例的共享名。如果SharedObjectRegister函數(shù)返回Success,則新線程創(chuàng)建成功。
然后,執(zhí)行指定代碼。有兩種方法讓新線程執(zhí)行指定的代碼:一種是在自定義類用戶對象的constructor事件中編寫腳本,新線程創(chuàng)建后就會自動執(zhí)行該事件腳本;另一種方法是使用SharedObjectGet函數(shù)。該函數(shù)實現(xiàn)共享對象實例的引用,如:
SharedObjectGet ( “thread1” ,inv_thread )
其中inv_thread是用來存儲共享對象實例的一個對象變量,要求與ccuo_thread具有同一個類名。
最后,通過使用Post語句,即以inv_thread.Post of_function(agrs)的形式,異步調(diào)用共享對象的函數(shù)of_function。
在完成任務后,可以用SharedObjectUnregister函數(shù)中止線程,也可用SharedObjectDirectory函數(shù)列出所有有效的共享對象。
函數(shù)調(diào)用部分
本文所用Win32 API函數(shù)原型為:
Function Ulong FindWindowA ( String lpClassName ,String lpWindowName ) Library “user32.dll”
Function Ulong GetTickCount ( ) Library “kernel32.dll”
Function Ulong GetDesktopWindow ( ) Library “user32.dll”
Function Boolean GetWindowRect ( Ulong hWnd ,ref stc_rect lpRect ) Library “user32.dll”
Function Boolean MoveWindow ( Ulong hWnd ,int X ,int Y ,int nWidth ,int nHeight ,Boolean bRepaint ) Library “user32.dll”
下面具體討論如何實現(xiàn)消息對話框的居中顯示:
//聲明對象變量
ccuo_thread lccuo_thread
//創(chuàng)建新線程
SharedObjectRegister (‘ccuo_thread’ ,‘thread_center’ )
//引用實例
SharedObjectGet (‘thread_center’ ,lccuo_thread )
//調(diào)用窗口居中函數(shù)
lccuo_thread.Post of_center (‘#32770’ ,‘Demostration’ ,2000 )
//創(chuàng)建消息對話框
MessageBox ( ‘Demostration’ ,‘Copyright(c) 2001 by Y.L.Sun’ )
//中止線程
SharedObjectunRegister ( ‘thread_center’ )
函數(shù)實現(xiàn)部分
實現(xiàn)窗口居中顯示的函數(shù)是自定義類用戶對象ccuo_thread的對象函數(shù)of_center,其實現(xiàn)代碼如下:
ccuo_thread.of_center ( String lpclassname ,String
lpwindowname , Ulong dwtimeout ) return Boolean
//lpclassname: 消息對話框的類名(#32770)
//lpwindowname: 消息對話框的標題
//dwtimeout: 超時計數(shù)
Ulong lul_hwnd //存放消息對話框的句柄
Ulong lul_start //計時開始時刻的值
lul_start = GetTickCount ( ) //計時開始
do
//查找頂層窗口
lul_hwnd=FindWindowA ( lpclassname ,lpwindowname )
//找到頂層窗口后,跳出循環(huán)
if lul_hwnd <> 0 then exit
//判斷是否已超時
loop while GetTickCount( )-lul_start< dwtimeout
//沒有找到消息對話框
if lul_hwnd = 0 then
return false
else
//對話框居中
return of_center ( 0 ,lul_hwnd )
end if
of_center的重載函數(shù)代碼如下:
ccuo_thread.of_center ( Ulong hwndp ,Ulong hwndc ) return Boolean
//hwndp:父窗口的句柄,值為0時認為是桌面
//hwndc:子窗口的句柄
int li_x //窗口的X坐標
int li_y //窗口的Y坐標
stc_rect lstc_parent //父窗口的4邊坐標
stc_rect lstc_child //子窗口的4邊坐標
//值為0時認為是桌面
if hwndp = 0 then hwndparent =
GetDesktopWindow ( )
//獲得窗口的4邊坐標
if not GetWindowRect ( hwndcurrent ,lstc_child ) then return false
if not GetWindowRect ( hwndparent ,lstc_parent ) then return false
li_x = (( lstc_parent.right - lstc_parent.left ) -
( lstc_child.right -lstc_child.left )) /2
li_y = (( lstc_parent.bottom - lstc_parent.top ) -
( lstc_child.bottom -lstc_child.top )) /2
//計算子窗口的X、Y坐標
if li_x < 0 or li_y < 0 then return false
//移動子窗口
if not MoveWindow ( hwndcurrent ,li_x ,li_y ,lstc_child.right -lstc_child.left ,lstc_child.bottom - lstc_child.top ,false ) then return false
return true
本文代碼在PB 7.0下通過。
“PB中消息對話框的居中顯示方法是什么”的內(nèi)容就介紹到這里了,感謝大家的閱讀。如果想了解更多行業(yè)相關(guān)的知識可以關(guān)注創(chuàng)新互聯(lián)網(wǎng)站,小編將為大家輸出更多高質(zhì)量的實用文章!