안녕하세요. 최용일입니다.

윈도우 메세지를 처리하실려면 윈도우 핸들을 할당하는게 아니라 CreateWindow/CreateWindowEx라는 API를 이용해서 윈도우 자체를 하나 만드셔서 윈도우메세지를 처리할 수 있도록 해주시면 됩니다.

^^ 항상 즐코하세요...

윈도우 핸들을 할당하는 방법에는 AllocateHWnd와 MakeObjectInstance 함수가 있는데
MakeObjectInstance 함수는 메모리 릭이 발생한다고 해서 잘 안씁니다.

<!--CodeS-->
constructor TMyThread.Create;
begin
  inherited Create(True);

  FWindowHandle := AllocateHWnd(WndProc); // 델파이 7 이상에서는 Classes.AllocateHWnd
end;

destructor TMyThread.Destroy;
begin
  DeAllocateHWnd(FWindowHandle); // 델파이 7 이상에서는 Classes.DeAllocateHWnd

  inherited Destroy;
end;

procedure TMyThread.WndProc(var Message: TMessage);
begin
  with Message do
  begin
    case Msg of
      WM_COMMAND:
      begin
        // 메세지 처리
      end;
    end;
    Result := DefWindowProc(FWindowHandle, Msg, wParam, lParam);
  end;
end;
<!--CodeE-->