source: trunk/dll/objwin.c@ 720

/***********************************************************************

  $Id: objwin.c 593 2007-03-31 19:13:59Z gyoung $

  Object windows

  Copyright (c) 1993-98 M. Kimes
  Copyright (c) 2006 Steven H.Levine

  26 Jul 06 SHL Check more run time errors
  02 Nov 06 SHL Comments
  30 Mar 07 GKY Remove GetPString for window class names

***********************************************************************/

#define INCL_DOS
#define INCL_WIN
#define INCL_GPI
#include <os2.h>

#include <stdarg.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <ctype.h>
#include <stddef.h>

#include "fm3dll.h"
#include "fm3dlg.h"
#include "fm3str.h"

static PSZ pszSrcFile = __FILE__;

#pragma alloc_text(OBJWIN,ObjectWndProc,MakeObjWin)

MRESULT EXPENTRY ObjectWndProc(HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
{
  DIRCNRDATA *dcd;

  dcd = WinQueryWindowPtr(hwnd, QWL_USER);
  if (dcd) {
    switch (dcd->type) {
    case DIR_FRAME:
      return DirObjWndProc(hwnd, msg, mp1, mp2);
    case TREE_FRAME:
      return TreeObjWndProc(hwnd, msg, mp1, mp2);
    case COLLECTOR_FRAME:
      return CollectorObjWndProc(hwnd, msg, mp1, mp2);
    case ARC_FRAME:
      return ArcObjWndProc(hwnd, msg, mp1, mp2);
    }
  }
  return WinDefWindowProc(hwnd, msg, mp1, mp2);
}

VOID MakeObjWin(VOID * args)
{
  HWND ObjectHwnd;
  HAB hab2;
  HMQ hmq2;
  QMSG qmsg2;

  hab2 = WinInitialize(0);
  if (hab2) {
    hmq2 = WinCreateMsgQueue(hab2, 512);
    if (hmq2) {
      DosError(FERR_DISABLEHARDERR);
      WinRegisterClass(hab2,
                       WC_OBJECTWINDOW,
                       ObjectWndProc, 0, sizeof(PVOID));
      ObjectHwnd = WinCreateWindow(HWND_OBJECT,
                                   WC_OBJECTWINDOW,
                                   (PSZ) NULL,
                                   0,
                                   0L,
                                   0L,
                                   0L,
                                   0L, 0L, HWND_TOP, OBJ_FRAME, NULL, NULL);
      if (!ObjectHwnd)
        Win_Error2(HWND_OBJECT, HWND_DESKTOP, pszSrcFile, __LINE__,
                   IDS_WINCREATEWINDOW);
      else {
        WinSetWindowPtr(ObjectHwnd, QWL_USER, args);
        /* initially populate container */
        WinSendMsg(ObjectHwnd, UM_SETUP, MPVOID, MPVOID);
        PostMsg(ObjectHwnd, UM_RESCAN, MPVOID, MPVOID);
        priority_normal();
        while (WinGetMsg(hab2, &qmsg2, (HWND) 0, 0, 0))
          WinDispatchMsg(hab2, &qmsg2);
        WinDestroyWindow(ObjectHwnd);
      }
      WinDestroyMsgQueue(hmq2);
    }
    WinTerminate(hab2);
  }
}