루단스 wrote:

> 델파이 기본소켓을이용해서

> 문자채팅을 하는데..

> edit컴포에서 엔터치면 소켓에 문자를 실어 날리는데.

> 그때..'띵' 하고 소리가 나네요..

>

> 무슨 문제죠???

> 제가 어떤 처리를 해줘햐하나요??

> 정말 궁굼해요.



public

{ Public declarations }

// 이거는 시스템에서 Alt같은 것을 함께 눌렀을 경우 소리를 내지 못하게 하는

// 거여요! 귀찬은 소리여 안녕!

Procedure nosound(var Msg: TWMGetDlgCode); message CM_DIALOGCHAR;

end;



implementation



{$R *.DFM}



// 물론 이 아래의 있는 구문을 치면 소리가 나질 않지요!

// 보통은 Alt키가 메뉴의 단축키로 쓰이지요!

// 그래서 버리.. 파일(F) 편집(E) 보기(V) 등.. Alt키와 함께 f나 e나 v등을

// 치면 소리가 안나는디 다른 것을 치면 소리가 나지요

// 지금 익스플러러 상에서 Alt키+F키를 쳐보셔요 소리가 안나고 메뉴가 나오지요!

// 그런데 Alt키+Z키를 치면 소리가 날겁니다. 그러니깐 이거는 일종의 거짓말을

// 하는 거지요! 예를들어 Alt키+Z키쳐도 상관이 없는거 처럼 할라꼬....

// 이건 소스 안치고도 할수는 있지요!

// 오브젝트 인스펙터에서 폼의 속성중....

// bordericons속성중 bisystemmenu를 false로 놓는다면야! 아래의 소스를

// 안 쳐도 되지만 히~! 그럼 모양이 폼 안나니깐.....



// 지금의 질문과 같은 것두 이와 같이 하면 될겁니다.

// 행복하셔요~



procedure TForm1.nosound(var Msg: TWMGetDlgCode);

begin

inherited;

Msg.Result := DLGC_WANTMESSAGE or DLGC_WANTALLKEYS or DLGC_WANTARROWS or

DLGC_WANTTAB or DLGC_WANTCHARS;

end;

잘못했는지 모르겠지만, copy해서 해봤는데, 여전히 소리가 납니다.

좀 더 자세히 설명해 주시면 고맙겠습니다.

감기조심하세요..^^