안녕하세요? 유승우 입니다.

맨날 실패한 프로젝트에 빠져 허우적 거리고 있고,
요즘은 할일이 없어서 맨날 뒹굴뒹굴 거리고 있습니다.

폭풍속의 전야라고나 할까요..?

아...답변..

우선 SetCapture라는 함수는 현재 쓰레드에 속한 주어진 윈도우에 마우스를 잡아두는
함수입니다. 일단 윈도우가 마우스를 잡아 놓으면, 커서가 이 윈도우의 테두리내에 있든
그렇지 않든 모든 마우스 입력은 바로 이 윈도우로 가게 됩니다.(특정 윈도우 Handle을 가지고 있는..)
한번에 하나의 윈도우만 마우스로 잡아둘수 있습니다. 마우스 커서가 다른 쓰러드에서 만든
윈도우 위에 놓이게 되면, 마우스 버튼이 눌렸을때에만 시스템에서 이 윈도우로 마우스 입력을
보냅니다.

예제..


procedure TForm1.Button2Click(Sender: TObject);
begin
  Label1.Caption := IntToStr(SetCapture(Application.Handle));
end;

만일 이해가 안가시면 위의 예제를 한번 해 보세요. 대강은 무슨말인지 아실겁니다.

그러 이만..