|
|
1.1 root 1: /****************************************************************************
2: *
3: * lfinit.c
4: *
5: * Initialization portion of LineFractal Application.
6: *
7: * Created by Microsoft Corp., 1988
8: ****************************************************************************/
9:
10: #define INCL_WINMESSAGEMGR
11:
12: #include <os2.h>
13: #include "linefrac.h"
14:
15: extern HAB hAB;
16: extern HWND hwndLineFrac;
17: extern HWND hwndLineFracFrame;
18:
19:
20:
21:
22: /****************************************************************************
23: *
24: * LineFracInitApp
25: *
26: * Register application window class and creates standard window.
27: *
28: ****************************************************************************/
29:
30: BOOL FAR
31: LineFracInitApp(VOID)
32: {
33: char szTitle[24];
34: ULONG ctldata;
35:
36: /* Register Application Window Class */
37:
38: if ( !WinRegisterClass( hAB, (PCH)"LineFractal", (PFNWP)LineFracWndProc,
39: CS_SIZEREDRAW, 0 ))
40: return FALSE;
41:
42:
43: /* Create a window instance of class "LineFractal" */
44:
45: WinLoadString( hAB, NULL, IDSTITLE, sizeof(szTitle), (PCH)szTitle );
46:
47: ctldata = FCF_STANDARD;
48:
49: if (hwndLineFracFrame = WinCreateStdWindow(
50: HWND_DESKTOP, /* specify desktop as parent window */
51: WS_VISIBLE, /* window styles */
52: &ctldata, /* frame creation flags */
53: (PCH)"LineFractal", /* window class name */
54: (PCH)szTitle, /* name appearing in window caption */
55: 0L, /* */
56: (HMODULE)NULL, /* use current executable module id */
57: ID_LINEFRACTAL, /* menu id */
58: (HWND FAR *)&hwndLineFrac /* window handle */
59: ))
60:
61: return TRUE;
62:
63: return FALSE;
64: }
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.