Hi~ Dear Sir: I want to capture a mouse message when I Mouse down or up, and i also to get the position when I move it, But I don't know why I can't capture the mouse message. My code is as following: Thanks~ David LRESULT CALLBACK WindowProcedureWindowSenondForImageEdit(HWND hWnd, UINT msg, WPARAM wParam, LPARAM lParam) { bool fCallDefProc=false; LRESULT lresult; switch(msg) { case WM_NCHITTEST: //sent to a window when the cursor moves { return HTCAPTION; } case WM_CREATE : RECT rc; POINT point; GetWindowRect(hWnd,&rc); point.x = rc.left 10; point.y = rc.top 10; // &MAKEPOINTS( ScreenToClient(hWnd,&point); break; case WM_LBUTTONDOWN: ShowMessage("ok"); break; case WM_MOUSEMOVE: ShowMessage("ok"); case WM_LBUTTONUP: if (GetCapture()!= hWnd) break; InvalidateRect(hWnd,NULL,TRUE); ReleaseCapture(); break; default: fCallDefProc=true; break; } // HWND hwnd2; // hwnd2=GetCapture(); // if (GetCapture()!= hWnd) // ShowMessage("no"); // else // ShowMessage("yes"); if (fCallDefProc) lresult=DefWindowProc(hWnd,msg,wParam ,lParam); return (lresult); } void __fastcall TForm1::Button1Click(TObject *Sender) { if (hWnd1 == NULL) { HINSTANCE hInstance=HInstance; MSG msg; WNDCLASS wClass; wClass.style =CS_HREDRAW|CS_VREDRAW ; // wClass.style =CS_DBLCLKS; wClass.lpfnWndProc =WindowProcedureWindowSenondForImageEdit; wClass.cbClsExtra =0; wClass.cbWndExtra =0; wClass.hInstance =hInstance; wClass.hIcon =LoadIcon(hInstance,IDI_APPLICATION); wClass.hCursor =LoadCursor(NULL,IDC_ARROW); wClass.hbrBackground =(HBRUSH)(COLOR_WINDOW 9 ); wClass.lpszMenuName =NULL; wClass.lpszClassName ="SecondWINDOW"; if (RegisterClass(&wClass)==NULL) return; hWnd1 =CreateWindowEx(WS_EX_TOOLWINDOW , "SecondWINDOW" , (LPCTSTR)"Screen", WS_POPUP | WS_VISIBLE , 60, 20, 500, 60 ,NULL,NULL,hInstance,NULL); while( GetMessage(&msg,NULL,0,0)) { TranslateMessage(&msg); DispatchMessage(&msg); } } }

The link are for your reference: http://delphi.ktop.com.tw/topic.php?TOPIC_ID=23435