Q&A

  • 쓰래드에서 PeekMessage를 사용하여 Form1의 윈도우 메세지를 갖다쓰려면 ?
안뇽하세요?

쓰래드에서여 Form1으로 가는 메세지를 PeekMessage를 사용해서 갖다쓸수 없을까요? 생각대로 다음과 같이 해보았는데요, 4203553의 메세지만 계속 날라오네여..ㅡ.ㅡ;; 고수님들의 가르침 부탁드릴께여..

procedure TMainThread.Execute;
var
   msg: TMsg;
begin
   while (not Terminated) and (FFlag) do
   begin
      PeekMessage(msg, Form1.Handle, 0, 0, PM_REMOVE);

      case msg.message of
         WM_SYSCOMMAND:
            begin
               Form1.Memo1.Lines.Add('MyMessage from Thread');
            end;
         MyMessage:
            begin
               Form1.Memo1.Lines.Add('MyMessage from Thread');
            end;

      end;
   end;
end;
0  COMMENTS