🚀 go-pugleaf

> Please show all of the code.  You probably are not setting up your window
> properly, but your pseudocode doesn't show what you are actually doing.

Unfortunately, doesn�t matter the windows creation code... The same code
works on Borland C++ and doesn�t work on BCB6...
The code is:

  //*DEBUGGING MESSAGE
  WNDCLASS windowClass;
  windowClass.style         = CS_HREDRAW | CS_VREDRAW | CS_OWNDC ;
  windowClass.lpfnWndProc   = (WNDPROC)WndProc;
  windowClass.cbClsExtra    = 0 ;
  windowClass.cbWndExtra    = 0 ;
  windowClass.hInstance     = hInstance ;
  windowClass.hbrBackground = (HBRUSH)(GetStockObject(BLACK_BRUSH));
  windowClass.lpszMenuName  = NULL;
  windowClass.lpszClassName = "TMyForm";
  RegisterClass(&windowClass);

 HWND hWindow = CreateWindow ("TMyForm",
  "MyForm",
  WS_POPUP | WS_BORDER,
  10,10,200,200,
  NULL,
  NULL,
  hInstance,
  NULL);

  MSG msg;
  PostMessage(HWND_BROADCAST, WM_USER, 0, 0L);
  if(PeekMessage (&msg, NULL, 0, 0, PM_REMOVE)) {
    MessageBox(NULL, "Work!", "", MB_OK);
  } else {
    MessageBox(NULL, "Don�t work!", "", MB_OK);
  }
  return 0;
  //*/

On BCB6, I looked at the message gueue after the broadcast msg and there is
no msg to the peeked. And on the BC the message is there on the queue.

Hope any help.
Best regards,
Alexandre S�


"Remy Lebeau (TeamB)" <no.spam@no.spam.com> escreveu na mensagem
news:42b317d0$1@newsgroups.borland.com...
>
> "Alexandre S�" <alexandre@daccord.com.br> wrote in message
> news:42b30d0a$1@newsgroups.borland.com...
>
> > Let the code:
>
> Please show all of the code.  You probably are not setting up your window
> properly, but your pseudocode doesn't show what you are actually doing.
>
>
> Gambit
>
>