If OpenWindow(0,0,0,500,250,"Window",#PB_Window_SystemMenu|#PB_Window_ScreenCentered) windowex = CreateWindowEx_(#WS_EX_CLIENTEDGE,"Button","",#WS_VISIBLE|#WS_POPUP|#BS_OWNERDRAW,100,100,300,20,WindowID(0),0,GetModuleHandle_(0),0) If CreateStatusBar(0,windowex) AddStatusBarField(100) AddStatusBarField(100) StatusBarText(0,0,"Statustext") EndIf SetParent_(windowex,WindowID(0)) Repeat : Until WaitWindowEvent() = #PB_Event_CloseWindow EndIf