PB去掉視窗標題欄

setwindowpos函式把視窗的顯示層次修改為hwnd—topmost，就可使指定視窗永遠不會被其它視窗覆蓋，該函式宣告為：

function long setwindowpos(long hwnd,long ord,long x,long y,long dx,long dy,long uflag) library ″user32″

引數1為要頂層顯示的視窗控制代碼，引數2指定顯示的層次，引數7為附加選項，其餘引數指定視窗位置和大小，均可忽略。在視窗的open或activate事件中加入如下函式呼叫：

setwindowpos(handle(this),－1,0,0,0,0,3)

引數2取－1表示在最頂層顯示視窗，取1表示在最底層顯示；最後乙個引數若取1，表示視窗大小保持不變，取2表示保持位置不變，因此，取3（=1＋2）表示大小和位置均保持不變，取0表示將視窗的大小和位置改變為指定值。

此外可以通過findwindow尋找視窗

setforegroundwindow()可以用來將其他執行緒建立的視窗送到前台並將其啟用，獲得使用者的互動事件

例如：1、把下列宣告加到global external functions：

function ulong setwindowpos(ulong hwnd,ulong hwndinsertafter,ulong x,ulong y,ulong cx,ulong cy,ulong wflags) library "user32.dll"

function ulong setwindowlonga(long hwnd, long nindex, long dwnewlong) library 'user32.dll'

function ulong getwindowlonga(long hwnd, long nindex) library 'user32.dll'

2、把下列**加到w_frame視窗（即mdi視窗）的open事件：

////置頂

//setwindowpos(handle(this),-1,0,0,0,0,3)

////無標題選單

//long dwstyle

dwstyle = getwindowlonga(handle(this), -16)

dwstyle = dwstyle - 12582912

dwstyle = setwindowlonga(handle(this), -16, dwstyle)

setwindowpos(handle(this), -2, 0, 0, 0, 0, 39)