A Window Procedure
MRESULT EXPENTRY WindowProc( HWND hwndClient, USHORT msg, MPARAM mp1 MAPARAM mp2)
{
HPS ps;
MRESULT mr = ( MRESULT )0;
switch( msg )
{
case WM_PAINT:
ps = WinBeginPaint( hwndClient, NULL, NULL );
WinEndPaint( ps )
break;
default:
mr = WinDefWindowProc( hwndClient, msg, mp1, mp2 )
break;
}
return mr;
}