|
|
1.1 ! root 1: /****************************** Module Header ******************************\ ! 2: * Module Name: skelinit.c ! 3: * ! 4: * Initialization portion of Presentation Manager Skeleton VIO Application ! 5: * ! 6: * Created: 25-Jul-88 (adapted from PM Template App.) ! 7: * ! 8: * Created by Microsoft Corporation ! 9: * ! 10: * ! 11: \***************************************************************************/ ! 12: ! 13: #define INCL_WINCOMMON ! 14: #define INCL_WINMESSAGEMGR ! 15: #define INCL_AVIO ! 16: #define INCL_BASE ! 17: ! 18: #include <os2.h> ! 19: #include "browse.h" ! 20: ! 21: extern HAB hAB; ! 22: extern HMQ hMsgQ; ! 23: extern HWND hwndSkel; ! 24: extern HWND hwndSkelFrame; ! 25: extern HDC hDC; ! 26: extern HVPS hVPS; ! 27: extern HPS hPS; ! 28: ! 29: /***************************** Private Function ****************************\ ! 30: * ! 31: * BOOL FAR SkelInitApp( ) ! 32: * ! 33: * Effects: Registers Application Window Class ! 34: * Creates Standard Window ! 35: * ! 36: * Warnings: None ! 37: * ! 38: \***************************************************************************/ ! 39: ! 40: BOOL FAR SkelInitApp( VOID ) ! 41: { ! 42: ! 43: char szTitle[21]; ! 44: ULONG ctldata; ! 45: ! 46: /* Register Application Window Class */ ! 47: ! 48: if ( !WinRegisterClass( hAB, (PCH)"Skel", (PFNWP)SkelWndProc, ! 49: CS_SYNCPAINT, 0 ) ) ! 50: return( FALSE ); ! 51: ! 52: ! 53: /* Create a window instance of class "Skel" */ ! 54: ! 55: WinLoadString( hAB, NULL, IDSTITLE, sizeof(szTitle), (PCH)szTitle ); ! 56: ! 57: ctldata = FCF_STANDARD | FCF_VERTSCROLL | FCF_HORZSCROLL ; ! 58: ! 59: hwndSkelFrame = WinCreateStdWindow( ! 60: HWND_DESKTOP, /* specify desktop as parent window */ ! 61: /* window styles */ ! 62: WS_VISIBLE | FS_ICON | FS_ACCELTABLE , ! 63: &ctldata, /* frame creation flags */ ! 64: (PCH)"Skel",/* window class name */ ! 65: (PCH)szTitle, /* name appearing in window caption */ ! 66: 0L, /* */ ! 67: (HMODULE)NULL, /* use current executable module id */ ! 68: ID_SKEL , /* menu id + accelerator id + icon id */ ! 69: (HWND FAR *)&hwndSkel /* window handle */ ! 70: ); ! 71: ! 72: return( TRUE ); ! 73: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.