WIN32 - Better Windowed/Debug gfx mode

BlitzMax Forums/BlitzMax Module Tweaks/WIN32 - Better Windowed/Debug gfx mode

DredPirateRoberts

(Posted 2004) [#1]

changed the blitzgl.win32.c file ( id backup original i dont know if this breaks anything so far )

adds window resizing . fixes bug that made window wrong size
and mouse y was off.

functions i added to handle resizing and detecting window close.

BOOL bglWinIsResized ( void )
BOOL bglWinIsClosed ( void )
int bglWinWidth ( void ) << call after bglWinISResized = True
int bglWinHeight ( void ) << call after when bglWinISResized = True

#include <windows.h>

#include <gl/gl.h>
#include <gl/glu.h>

enum{
	BGL_FULLSCREEN=1,
	BGL_BACKBUFFER=2,
	BGL_ALPHABUFFER=4,
	BGL_DEPTHBUFFER=8,
	BGL_STENCILBUFFER=16,
	BGL_ACCUMBUFFER=32
};

static const char *CLASS_NAME="BlitzGL Window Class";

static HDC context_hdc;
static HWND context_hwnd;
static HGLRC context_hglrc;

static int fullScreen;
static DEVMODE devmode;
static int active,started,font_lists;

typedef BOOL (APIENTRY * WGLSWAPINTERVALEXT) (int);
static WGLSWAPINTERVALEXT wglSwapIntervalEXT;

static void bglExit(){
	bglDeleteContext(0);
}

static void poll(){
	MSG msg;
	while( PeekMessage( &msg,0,0,0,PM_REMOVE ) ){
		TranslateMessage( &msg );
		DispatchMessage( &msg );
	}
}

// NEW FUNCS BELOW ===

int g_wingl_width;
int g_wingl_height;
BOOL g_wingl_resize;
BOOL g_wingl_closed;

BOOL bglWinIsResized ( void )
{
   BOOL rc = g_wingl_resize;

   g_wingl_resize = FALSE;

   return( rc );
}

BOOL bglWinIsClosed ( void )
{
   return( g_wingl_closed );
}

int bglWinWidth ( void )
{
   return( g_wingl_width );
}

int bglWinHeight ( void )
{
   return( g_wingl_height );
}

// END NEW FUNCTIONS

// CHANGED AND ADDED STUFF TO NEXT FUNC and CreateWindowContext
_stdcall long wndProc( HWND hwnd,UINT msg,WPARAM wp,LPARAM lp ){
   RECT rect;

	switch( msg ){
       case WM_SIZE:
           GetClientRect(hwnd, &rect); 

           glViewport ( 0, 0, rect.right, rect.bottom );
 
           glMatrixMode(GL_PROJECTION);
           glLoadIdentity();
           gluOrtho2D( rect.left, rect.right, rect.bottom, rect.top ); 
           glMatrixMode(GL_MODELVIEW);
           g_wingl_resize = TRUE;
           g_wingl_width = rect.right - rect.left;
           g_wingl_height = rect.bottom - rect.top;
       break;   

	case WM_CLOSE:
       g_wingl_closed = TRUE;
		return 0;
	case WM_PAINT:
		ValidateRect( hwnd,0 );
		return 0;
	case WM_SETFOCUS:
		if( devmode.dmSize && !fullScreen ){
			if( ChangeDisplaySettings( &devmode,CDS_FULLSCREEN )==DISP_CHANGE_SUCCESSFUL ){
				fullScreen=1;
			}else if( devmode.dmFields&DM_DISPLAYFREQUENCY ){
				devmode.dmDisplayFrequency=0;
				devmode.dmFields&=~DM_DISPLAYFREQUENCY;
				if( ChangeDisplaySettings( &devmode,CDS_FULLSCREEN )==DISP_CHANGE_SUCCESSFUL ){
					fullScreen=1;
				}
			}
		}
		return 0;
	case WM_KILLFOCUS:
		if( devmode.dmSize && fullScreen ){
			ChangeDisplaySettings( 0,0 );
			ShowWindow( hwnd,SW_MINIMIZE );
			fullScreen=0;
		}
		return 0;
	}
	return DefWindowProc( hwnd,msg,wp,lp );
}

void bglDeleteContext( context ){
	if( !active ) return;
	wglDeleteContext( context_hglrc );
	DestroyWindow( context_hwnd );
	ChangeDisplaySettings( 0,0 );
	active=0;
}

int bglDisplayModes( int *modes,int size ){

	int count=size/16;
	int *end=modes+count*4,i=0,n=0;

	while( modes!=end ){

		DEVMODE	mode;
		mode.dmSize=sizeof(DEVMODE);
		mode.dmDriverExtra=0;

		if( !EnumDisplaySettings(0,i++,&mode) ) break;

		if( mode.dmBitsPerPel<16 ) continue;

		*modes++=mode.dmPelsWidth;
		*modes++=mode.dmPelsHeight;
		*modes++=mode.dmBitsPerPel;
		*modes++=mode.dmDisplayFrequency;
		++n;
	}
	return n;
}

static void setPfd( PIXELFORMATDESCRIPTOR *pfd,int flags ){

	memset( pfd,0,sizeof(*pfd) );

	pfd->nSize=sizeof(pfd);
	pfd->nVersion=1;
	pfd->cColorBits=1;
	pfd->iPixelType=PFD_TYPE_RGBA;
	pfd->iLayerType=PFD_MAIN_PLANE;
	pfd->dwFlags=PFD_DRAW_TO_WINDOW|PFD_SUPPORT_OPENGL;

	pfd->dwFlags|=(flags & BGL_BACKBUFFER) ? PFD_DOUBLEBUFFER : 0;
	pfd->cAlphaBits=(flags & BGL_ALPHABUFFER) ? 1 : 0;
	pfd->cDepthBits=(flags & BGL_DEPTHBUFFER) ? 1 : 0;
	pfd->cStencilBits=(flags & BGL_STENCILBUFFER) ? 1 : 0;
	pfd->cAccumBits=(flags & BGL_ACCUMBUFFER) ? 1 : 0;
}

static void createWindowedContext( int width,int height,int flags ){

	long pf;
	PIXELFORMATDESCRIPTOR pfd;
	RECT				rect;

	devmode.dmSize=0;

	SetRect ( &rect, 0, 0, width, height );
	AdjustWindowRectEx ( &rect, WS_CAPTION | WS_SYSMENU | WS_MINIMIZEBOX | WS_MAXIMIZEBOX | WS_SIZEBOX, FALSE, WS_EX_APPWINDOW );

	context_hwnd=CreateWindowEx( 
		0,CLASS_NAME,"BlitzGL Application",
		WS_CAPTION | WS_VISIBLE | WS_SYSMENU | WS_MINIMIZEBOX | WS_MAXIMIZEBOX | WS_SIZEBOX,
		CW_USEDEFAULT,
       CW_USEDEFAULT,
		rect.right - rect.left,
		rect.bottom - rect.top,
       0,
       0,
       GetModuleHandle(0),
       0 );

	ShowWindow( context_hwnd,SW_RESTORE );

	setPfd( &pfd,flags );

	context_hdc=GetDC( context_hwnd );
	pf=ChoosePixelFormat( context_hdc,&pfd );
	if( !pf ){
		DestroyWindow( context_hwnd );
		return;
	}
	SetPixelFormat( context_hdc,pf,&pfd );
	context_hglrc=wglCreateContext( context_hdc );
	wglMakeCurrent( context_hdc,context_hglrc );

	active=1;
}

static void createFullscreenContext( int width,int height,int depth,int hertz,int flags ){

	long pf;
	PIXELFORMATDESCRIPTOR pfd;

	devmode.dmSize=sizeof(devmode);
	devmode.dmPelsWidth=width;
	devmode.dmPelsHeight=height;
	devmode.dmBitsPerPel=depth;
	devmode.dmFields=DM_PELSWIDTH|DM_PELSHEIGHT|DM_BITSPERPEL;
	if( hertz ){
		devmode.dmDisplayFrequency=hertz;
		devmode.dmFields|=DM_DISPLAYFREQUENCY;
	}
	context_hwnd=CreateWindowEx( 
		WS_EX_TOPMOST,CLASS_NAME,"BlitzGL Application",
		WS_POPUP|WS_VISIBLE|WS_CLIPSIBLINGS|WS_CLIPCHILDREN,0,0,width,height,0,0,GetModuleHandle(0),0 );

	setPfd( &pfd,flags );

	context_hdc=GetDC( context_hwnd );
	pf=ChoosePixelFormat( context_hdc,&pfd );
	if( !pf ){
		DestroyWindow( context_hwnd );
		return;
	}
	SetPixelFormat( context_hdc,pf,&pfd );
	context_hglrc=wglCreateContext( context_hdc );
	wglMakeCurrent( context_hdc,context_hglrc );

	active=1;
}

int bglCreateContext( int width,int height,int depth,int hertz,int flags ){

	bglDeleteContext();

	if( !started ){
	    WNDCLASS wc={0};
		wc.style=CS_HREDRAW|CS_VREDRAW|CS_OWNDC;
		wc.lpfnWndProc=(WNDPROC)wndProc;
		wc.hInstance=GetModuleHandle(0);
		wc.lpszClassName=CLASS_NAME;
		wc.hCursor=(HCURSOR)LoadCursor( 0,IDC_ARROW );
		wc.hbrBackground=0;//(HBRUSH)GetStockObject(BLACK_BRUSH);
		if( !RegisterClass( &wc ) ) exit(-1);
		atexit( bglExit );
		started=1;
	}

	if( flags & BGL_FULLSCREEN ){
		createFullscreenContext( width,height,depth,hertz,flags );
	}else{
		createWindowedContext( width,height,flags );
	}

	if( !active ) return 0;

	wglSwapIntervalEXT=(WGLSWAPINTERVALEXT)wglGetProcAddress("wglSwapIntervalEXT");

	bglSetSwapInterval( 0 );

	return 1;
}

int bglSetSwapInterval( int n ){
	return wglSwapIntervalEXT && wglSwapIntervalEXT(n);
}

void bglSwapBuffers(){
	if( !active ) return;
	SwapBuffers( context_hdc );
}

void bglSetMouseVisible( int visible ){
	int n;
	if( !active ) return;
	n=ShowCursor( visible );
	if( n<-1 || n>0 ) ShowCursor(!visible);
}

int bglFixedFontBitmaps(){
	HFONT hfont,t_font;
	HDC hdc;
		
	if( !active ) return 0;

	if( font_lists ) return font_lists;

	hfont=CreateFont( 
		14,0,0,0,
		FW_REGULAR,0,0,0,ANSI_CHARSET,OUT_DEFAULT_PRECIS,CLIP_DEFAULT_PRECIS,
		DEFAULT_QUALITY,DEFAULT_PITCH|FF_DONTCARE,"fixedsys" );

	hdc=CreateCompatibleDC(0);
	t_font=(HFONT)SelectObject( hdc,hfont );

	font_lists=glGenLists( 256 );
	wglUseFontBitmaps( hdc,0,255,font_lists );

	SelectObject( hdc,t_font );
	DeleteDC( hdc );
	DeleteObject( hfont );

	return font_lists;
}

add this to your bmx code

Extern
Function bglWinIsClosed()
Function bglWinIsResized()
Function bglWinWidth()
Function bglWinHeight()
End Extern

recompile modules . then your program

fredborg

(Posted 2004) [#2]

Great!

One small thing. It might be good to reset the 'bglWinIsClosed()' return value once it's been called. If you make a confirm requester now, and press 'cancel' it will keep popping up. Small example:

Strict

Graphics 640,480,0

Local graphics_width	= bglWinWidth()
Local graphics_height	= bglWinHeight()

While Not KeyDown(KEY_ESCAPE)

	If bglWinIsClosed()
		If Confirm("Are you sure you wish to quit?")
			End
		EndIf
	EndIf

	If bglWinIsResized()
		graphics_width = bglWinWidth()
		graphics_height = bglWinHeight()
	EndIf

	SetColor Rand(0,255),Rand(0,255),Rand(0,255)
	DrawRect Rand(0,graphics_width),Rand(0,graphics_height),20,20

	FlushMem
	Flip

Wend

The following 'blitzgl.win32.c' version resets the bglWinIsClosed return:

#include <windows.h>

#include <gl/gl.h>
#include <gl/glu.h>

enum{
	BGL_FULLSCREEN=1,
	BGL_BACKBUFFER=2,
	BGL_ALPHABUFFER=4,
	BGL_DEPTHBUFFER=8,
	BGL_STENCILBUFFER=16,
	BGL_ACCUMBUFFER=32
};

static const char *CLASS_NAME="BlitzGL Window Class";

static HDC context_hdc;
static HWND context_hwnd;
static HGLRC context_hglrc;

static int fullScreen;
static DEVMODE devmode;
static int active,started,font_lists;

typedef BOOL (APIENTRY * WGLSWAPINTERVALEXT) (int);
static WGLSWAPINTERVALEXT wglSwapIntervalEXT;

static void bglExit(){
	bglDeleteContext(0);
}

static void poll(){
	MSG msg;
	while( PeekMessage( &msg,0,0,0,PM_REMOVE ) ){
		TranslateMessage( &msg );
		DispatchMessage( &msg );
	}
}

// NEW FUNCS BELOW ===

int g_wingl_width;
int g_wingl_height;
BOOL g_wingl_resize;
BOOL g_wingl_closed;

BOOL bglWinIsResized ( void )
{
   BOOL rc = g_wingl_resize;

   g_wingl_resize = FALSE;

   return( rc );
}

BOOL bglWinIsClosed ( void )
{
    BOOL rc = g_wingl_closed;
    g_wingl_closed = FALSE;
    return( rc );
}

int bglWinWidth ( void )
{
   return( g_wingl_width );
}

int bglWinHeight ( void )
{
   return( g_wingl_height );
}

// END NEW FUNCTIONS

// CHANGED AND ADDED STUFF TO NEXT FUNC and CreateWindowContext
_stdcall long wndProc( HWND hwnd,UINT msg,WPARAM wp,LPARAM lp ){
   RECT rect;

	switch( msg ){
       case WM_SIZE:
           GetClientRect(hwnd, &rect); 

           glViewport ( 0, 0, rect.right, rect.bottom );
 
           glMatrixMode(GL_PROJECTION);
           glLoadIdentity();
           gluOrtho2D( rect.left, rect.right, rect.bottom, rect.top ); 
           glMatrixMode(GL_MODELVIEW);
           g_wingl_resize = TRUE;
           g_wingl_width = rect.right - rect.left;
           g_wingl_height = rect.bottom - rect.top;
       break;   

	case WM_CLOSE:
       g_wingl_closed = TRUE;
		return 0;
	case WM_PAINT:
		ValidateRect( hwnd,0 );
		return 0;
	case WM_SETFOCUS:
		if( devmode.dmSize && !fullScreen ){
			if( ChangeDisplaySettings( &devmode,CDS_FULLSCREEN )==DISP_CHANGE_SUCCESSFUL ){
				fullScreen=1;
			}else if( devmode.dmFields&DM_DISPLAYFREQUENCY ){
				devmode.dmDisplayFrequency=0;
				devmode.dmFields&=~DM_DISPLAYFREQUENCY;
				if( ChangeDisplaySettings( &devmode,CDS_FULLSCREEN )==DISP_CHANGE_SUCCESSFUL ){
					fullScreen=1;
				}
			}
		}
		return 0;
	case WM_KILLFOCUS:
		if( devmode.dmSize && fullScreen ){
			ChangeDisplaySettings( 0,0 );
			ShowWindow( hwnd,SW_MINIMIZE );
			fullScreen=0;
		}
		return 0;
	}
	return DefWindowProc( hwnd,msg,wp,lp );
}

void bglDeleteContext( context ){
	if( !active ) return;
	wglDeleteContext( context_hglrc );
	DestroyWindow( context_hwnd );
	ChangeDisplaySettings( 0,0 );
	active=0;
}

int bglDisplayModes( int *modes,int size ){

	int count=size/16;
	int *end=modes+count*4,i=0,n=0;

	while( modes!=end ){

		DEVMODE	mode;
		mode.dmSize=sizeof(DEVMODE);
		mode.dmDriverExtra=0;

		if( !EnumDisplaySettings(0,i++,&mode) ) break;

		if( mode.dmBitsPerPel<16 ) continue;

		*modes++=mode.dmPelsWidth;
		*modes++=mode.dmPelsHeight;
		*modes++=mode.dmBitsPerPel;
		*modes++=mode.dmDisplayFrequency;
		++n;
	}
	return n;
}

static void setPfd( PIXELFORMATDESCRIPTOR *pfd,int flags ){

	memset( pfd,0,sizeof(*pfd) );

	pfd->nSize=sizeof(pfd);
	pfd->nVersion=1;
	pfd->cColorBits=1;
	pfd->iPixelType=PFD_TYPE_RGBA;
	pfd->iLayerType=PFD_MAIN_PLANE;
	pfd->dwFlags=PFD_DRAW_TO_WINDOW|PFD_SUPPORT_OPENGL;

	pfd->dwFlags|=(flags & BGL_BACKBUFFER) ? PFD_DOUBLEBUFFER : 0;
	pfd->cAlphaBits=(flags & BGL_ALPHABUFFER) ? 1 : 0;
	pfd->cDepthBits=(flags & BGL_DEPTHBUFFER) ? 1 : 0;
	pfd->cStencilBits=(flags & BGL_STENCILBUFFER) ? 1 : 0;
	pfd->cAccumBits=(flags & BGL_ACCUMBUFFER) ? 1 : 0;
}

static void createWindowedContext( int width,int height,int flags ){

	long pf;
	PIXELFORMATDESCRIPTOR pfd;
	RECT				rect;

	devmode.dmSize=0;

	SetRect ( &rect, 0, 0, width, height );
	AdjustWindowRectEx ( &rect, WS_CAPTION | WS_SYSMENU | WS_MINIMIZEBOX | WS_MAXIMIZEBOX | WS_SIZEBOX, FALSE, WS_EX_APPWINDOW );

	context_hwnd=CreateWindowEx( 
		0,CLASS_NAME,"BlitzGL Application",
		WS_CAPTION | WS_VISIBLE | WS_SYSMENU | WS_MINIMIZEBOX | WS_MAXIMIZEBOX | WS_SIZEBOX,
		CW_USEDEFAULT,
       CW_USEDEFAULT,
		rect.right - rect.left,
		rect.bottom - rect.top,
       0,
       0,
       GetModuleHandle(0),
       0 );

	ShowWindow( context_hwnd,SW_RESTORE );

	setPfd( &pfd,flags );

	context_hdc=GetDC( context_hwnd );
	pf=ChoosePixelFormat( context_hdc,&pfd );
	if( !pf ){
		DestroyWindow( context_hwnd );
		return;
	}
	SetPixelFormat( context_hdc,pf,&pfd );
	context_hglrc=wglCreateContext( context_hdc );
	wglMakeCurrent( context_hdc,context_hglrc );

	active=1;
}

static void createFullscreenContext( int width,int height,int depth,int hertz,int flags ){

	long pf;
	PIXELFORMATDESCRIPTOR pfd;

	devmode.dmSize=sizeof(devmode);
	devmode.dmPelsWidth=width;
	devmode.dmPelsHeight=height;
	devmode.dmBitsPerPel=depth;
	devmode.dmFields=DM_PELSWIDTH|DM_PELSHEIGHT|DM_BITSPERPEL;
	if( hertz ){
		devmode.dmDisplayFrequency=hertz;
		devmode.dmFields|=DM_DISPLAYFREQUENCY;
	}
	context_hwnd=CreateWindowEx( 
		WS_EX_TOPMOST,CLASS_NAME,"BlitzGL Application",
		WS_POPUP|WS_VISIBLE|WS_CLIPSIBLINGS|WS_CLIPCHILDREN,0,0,width,height,0,0,GetModuleHandle(0),0 );

	setPfd( &pfd,flags );

	context_hdc=GetDC( context_hwnd );
	pf=ChoosePixelFormat( context_hdc,&pfd );
	if( !pf ){
		DestroyWindow( context_hwnd );
		return;
	}
	SetPixelFormat( context_hdc,pf,&pfd );
	context_hglrc=wglCreateContext( context_hdc );
	wglMakeCurrent( context_hdc,context_hglrc );

	active=1;
}

int bglCreateContext( int width,int height,int depth,int hertz,int flags ){

	bglDeleteContext();

	if( !started ){
	    WNDCLASS wc={0};
		wc.style=CS_HREDRAW|CS_VREDRAW|CS_OWNDC;
		wc.lpfnWndProc=(WNDPROC)wndProc;
		wc.hInstance=GetModuleHandle(0);
		wc.lpszClassName=CLASS_NAME;
		wc.hCursor=(HCURSOR)LoadCursor( 0,IDC_ARROW );
		wc.hbrBackground=0;//(HBRUSH)GetStockObject(BLACK_BRUSH);
		if( !RegisterClass( &wc ) ) exit(-1);
		atexit( bglExit );
		started=1;
	}

	if( flags & BGL_FULLSCREEN ){
		createFullscreenContext( width,height,depth,hertz,flags );
	}else{
		createWindowedContext( width,height,flags );
	}

	if( !active ) return 0;

	wglSwapIntervalEXT=(WGLSWAPINTERVALEXT)wglGetProcAddress("wglSwapIntervalEXT");

	bglSetSwapInterval( 0 );

	return 1;
}

int bglSetSwapInterval( int n ){
	return wglSwapIntervalEXT && wglSwapIntervalEXT(n);
}

void bglSwapBuffers(){
	if( !active ) return;
	SwapBuffers( context_hdc );
}

void bglSetMouseVisible( int visible ){
	int n;
	if( !active ) return;
	n=ShowCursor( visible );
	if( n<-1 || n>0 ) ShowCursor(!visible);
}

int bglFixedFontBitmaps(){
	HFONT hfont,t_font;
	HDC hdc;
		
	if( !active ) return 0;

	if( font_lists ) return font_lists;

	hfont=CreateFont( 
		14,0,0,0,
		FW_REGULAR,0,0,0,ANSI_CHARSET,OUT_DEFAULT_PRECIS,CLIP_DEFAULT_PRECIS,
		DEFAULT_QUALITY,DEFAULT_PITCH|FF_DONTCARE,"fixedsys" );

	hdc=CreateCompatibleDC(0);
	t_font=(HFONT)SelectObject( hdc,hfont );

	font_lists=glGenLists( 256 );
	wglUseFontBitmaps( hdc,0,255,font_lists );

	SelectObject( hdc,t_font );
	DeleteDC( hdc );
	DeleteObject( hfont );

	return font_lists;
}

And you should probably add a conditional compile to the Extern, like this:

?Win32
Extern
Function bglWinIsClosed()
Function bglWinIsResized()
Function bglWinWidth()
Function bglWinHeight()
End Extern
?

DredPirateRoberts

(Posted 2004) [#3]

i left the flag set cuz in my code i just quit when its closed .. but i could change that. ( and the conditional win32 thing ). just did this until they officialy add some features like this so i can get my project going.

Regards
Scott Host