問題來源於 ComBox.DroppedDown := True;
這樣可以彈出下拉框,但鼠標指針會消失,嘗試使用
ShowCursor(False); //隱藏光標
ShowCursor(True); //顯示光標
SendMessage(ComBox.Handle, WM_SETCURSOR,0,0); //這樣可以顯示出光標
反覆測試ShowCursor,成對調用可以隱藏和顯示,可ShowCursor隱藏的SendMessage(WM_SETCURSOR)卻無法恢復
問題來源於 ComBox.DroppedDown := True;
這樣可以彈出下拉框,但鼠標指針會消失,嘗試使用
ShowCursor(False); //隱藏光標
ShowCursor(True); //顯示光標
SendMessage(ComBox.Handle, WM_SETCURSOR,0,0); //這樣可以顯示出光標
反覆測試ShowCursor,成對調用可以隱藏和顯示,可ShowCursor隱藏的SendMessage(WM_SETCURSOR)卻無法恢復
delphi裏窗體改變大小怎麼讓裏邊的TreeView,GroupBox也隨着改變大小,比例不變. 請高手指點
delphi中經常見到以下兩種定義 Type TMouseProc = procedure (X,Y:integer); TMouseEvent = procedure (X,Y:integer
GetSystemMetrics(SM_CXSCREEN); //水平分辨率 GetSystemMetrics(SM_CYSCREEN); //垂直分辨率