As i said i dont use blitz3d i cant even test this myself but give this a try
userlib commands can be found here - http://www.blitzbasic.co.nz/Community/posts.php?topic=27586
[edit]code updated
Hope it works.
Local x=50 Local y=50 Local width=800 Local height=600 Local ontop=True AppTitle "test" Graphics width,height Const HWND_TOPMOST = -1 Const HWND_NOTOPMOST = -2 Const SWP_NOSIZE = 1 Const SWP_NOMOVE = 2 Const SWP_SHOWWINDOW = 40 Const SW_RESTORE=9 WinSettings( x, y, width, height, ontop ) While Not KeyHit(1) CheckMin() Flip Wend End Function WinSettings( x, y, width, height, topmost ) hwnd=api_FindWindow("Blitz Runtime Class","test" ) Select topmost Case True topmost=HWND_TOPMOST Case False topmost=HWND_NOTOPMOST End Select Api_SetWindowPos( hwnd, topmost, x, y, width, height, SWP_SHOWWINDOW Or SWP_NOMOVE Or SWP_NOSIZE ) End Function Function CheckMin() hwnd=api_FindWindow("Blitz Runtime Class", "test") If api_IsIconic(hwnd)=True Then api_ShowWindow(hwnd,SW_RESTORE) End If End Function
userlib commands can be found here - http://www.blitzbasic.co.nz/Community/posts.php?topic=27586
[edit]code updated
Hope it works.