제가 다른 유닛에서 메인 유닛으로 메시지를 보낼려 합니다
메시지 유형은 WM_SOCKET_CLOSE, WM_SOCKET_READ 등이구요
물론 제가 정의한 상수입니다...
그런데 메시지 보내는 건 되는데
한 함수에다 다 보낼수 있는지요..
예로 function test(var Msg :TMessage) : String; message WM_SOCKET_CLOSE or WM_SOCKET_READ;
이렇게는 컴파일이 되는데 실제로는 값을 못받네요..
한가지만 했을때는 잘 받는데 ....
움... 제가 잘 못받아서 그런가요? ㅜ.ㅜ
단지 아래의 문장의 문제는 알 수 있겠네요.
function test(var Msg :TMessage) : String; message WM_SOCKET_CLOSE or WM_SOCKET_READ;
WM_SOCKET_CLOSE or WM_SOCKET_READ 이것은
말 그대로 OR처리 된것입니다.
WM_SOCKET_CLOSE = $1000;
WM_SOCKET_READ = $2000;
function test(var Msg :TMessage) : String; message WM_SOCKET_CLOSE or WM_SOCKET_READ;
=>
function test(var Msg :TMessage) : String; message $3000;
이런것이죠 ^^
그리고 확실히 두 메세지를 어떻게 처리하는지 모를경우
걍 test2를 만들고 test를 호출하는식으로 하세요 이건 확실히 될테니