Return to skelinit.c CVS log

Up to [OS/2 SDKs] / pmsdk / samples / avioskel

Annotation of pmsdk/samples/avioskel/skelinit.c, revision 1.1.1.1

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 "skel.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.