I have a question about using more than two threads in a PM application. I
create an object window which handles messages sent to threads (different
parts of my program want to do things simultaneously, e.g. read one file
and display other). I use the /same/ thread function for all threads.

Is this OK to do? Are there any situations in which my program would behave
erroneusly?

THREADPARMS *pThread1;
THREADPARMS *pThread2;

int   main (int argc, char **argv)
{
  .
  .
  pThread1 = (THREADPARMS *) malloc (sizeof (THREADPARMS));
  pThread2 = (THREADPARMS *) malloc (sizeof (THREADPARMS));
  .
  .
  // create window etc.
  .
  .
}

MRESULT EXPENTRY MainWndProc (HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
{
  switch (msg)
  {
  case WM_CREATE:
    .
    .
    pThread1->tidObject = _beginthread (workerThread, NULL, STACKSIZE,
      (PVOID) pThread1);
    pThread2->tidObject = _beginthread (workerThread, NULL, STACKSIZE,
      (PVOID) pThread2);
    .
    .
  case WM_COMMAND:
    // send messages to threads here
    .
    .
  case WM_CLOSE:
    WinPostMsg (pThread1->hwndObject, WM_QUIT, 0, 0);
    WinPostMsg (pThread2->hwndObject, WM_QUIT, 0, 0);
    return FALSE;

  case WM_DESTROY:
    .
    .
    DosWaitThread (&pThread1->tidObject, DCWW_WAIT);
    DosWaitThread (&pThread2->tidObject, DCWW_WAIT);

  }
  ...
}

MRESULT EXPENTRY ObjectWinProc (HWND hwnd, ULONG msg, MPARAM mp1, MPARAM mp2)
{
  switch (msg)
  {
  case UM_START_SEARCH:            // fill listbox
    .
    .
  case UM_REDISPLAY:               // redisp listbox with changed options
    .
    .
  case UM_IMPORT_MLE:              // read file into MLE
    .
    .
    etc.
}

void  workerThread (void *arg)
{
  THREADPARMS   *pThread;
  HAB        habLB;
  HMQ        hmqLB;
  QMSG       qmsg;

  pThread = (THREADPARMS *) arg;
  DosSetPriority (PRTYS_THREAD, PRTYC_IDLETIME, pThread->prtyDelta, 0UL);
  habLB = WinInitialize ((USHORT) 0);
  hmqLB = WinCreateMsgQueue (habLB, 0);
  WinCancelShutdown (hmqLB, TRUE);

  WinRegisterClass (habLB, szClassObject,
    (PFNWP) ObjectWinProc, 0, sizeof (THREADPARMS *));

  pThread->hwndObject = WinCreateWindow (HWND_OBJECT, szClassObject, "",
    0, 0, 0, 0, 0, HWND_OBJECT, HWND_BOTTOM, 0, (PVOID)pThread, NULL);

  WinPostMsg (pThread->hwndClient, UM_ACK, (MPARAM) UM_THREAD_READY,
    (PVOID) pThread); // send usermessage that thread is ready

  while (WinGetMsg (habLB, &qmsg, 0, 0, 0))
  {
    WinDispatchMsg (habLB, &qmsg);
  }

  WinPostMsg (pThread->hwndClient, WM_QUIT, 0, 0);

  WinDestroyWindow (pThread->hwndObject);
  WinDestroyMsgQueue (hmqLB);
  WinTerminate (habLB);
  _endthread ();
}

        // Albert

---