{"id":251,"date":"2010-04-11T20:58:30","date_gmt":"2010-04-11T12:58:30","guid":{"rendered":"http:\/\/blog.infinity.idv.tw\/index.php\/2010\/04\/11\/delphi-%e9%80%81%e5%87%ba%e9%8d%b5%e7%9b%a4%e8%88%87%e6%bb%91%e9%bc%a0%e7%9a%84%e6%8c%87%e4%bb%a4\/"},"modified":"2011-04-07T10:54:57","modified_gmt":"2011-04-07T02:54:57","slug":"delphi-%e9%80%81%e5%87%ba%e9%8d%b5%e7%9b%a4%e8%88%87%e6%bb%91%e9%bc%a0%e7%9a%84%e6%8c%87%e4%bb%a4","status":"publish","type":"post","link":"http:\/\/blog.infinity.idv.tw\/?p=251","title":{"rendered":"[Delphi] \u9001\u51fa\u9375\u76e4\u8207\u6ed1\u9f20\u7684\u6307\u4ee4"},"content":{"rendered":"<p>\u7db2\u8def\u4e0a\u627e\u5230\u7684\u6587\u7ae0\uff0cOrd(&#8216;C&#8217;) &lt;==\u5176\u5be6\u8f49\u51fa\u4f86\u5c31\u662fASCII\u78bc\uff0c\u77e5\u9053\u5f8c\u6bd4\u8f03\u53ef\u4ee5\u9748\u6d3b\u904b\u7528\u5728\u7528\u8b8a\u6578\u7684\u65b9\u5f0f\u5e36\u5165\u3002<\/p>\n<p>&#160;<\/p>\n<p>\u6587\u7ae0\u51fa\u8655\uff1a<a title=\"http:\/\/blog.yam.com\/yqbagzdk\/article\/25791738\" href=\"http:\/\/blog.yam.com\/yqbagzdk\/article\/25791738\">http:\/\/blog.yam.com\/yqbagzdk\/article\/25791738<\/a><\/p>\n<p>======================================================<\/p>\n<p>\u6700\u8fd1\u78b0\u5230\u4f7f\u7528 SendMessage \u548c PostMessage \u6a5f\u6703\u8d85\u7d1a\u591a\uff0c\u7121\u975e\u662f\u56e0\u70ba\u592a\u591a\u7684<a href=\"http:\/\/xyz66.net\/DBT.htm\">\u7a0b\u5f0f\u5408\u8f2f<\/a>\u5c08\u6848\u9700\u6c42\uff0c\u5982\u679c\u8017\u8cbb\u4eba\u529b\u5168\u90e8\u81ea\u884c\u958b\u767c\uff0c\u5927\u6982\u8acb\u4e8c\u3001\u4e09\u500d\u7684\u4eba\u529b\u7d50\u679c\u4e5f\u53ea\u662f\u70ba\u4e86\u5b8c\u6210\u5e7e\u500b\u5c0d\u65bc\u5716\u5f62\u8655\u7406\u7684\u52d5\u4f5c\u800c\u5df2\uff0c<a href=\"http:\/\/xyz566.net\/ASI.htm\">\u5efa\u7bc9.\u5ba4\u5167\u8a2d\u8a08.\u670d\u88dd\u76f8\u95dc\u8edf\u9ad4<\/a>\u56e0\u6b64\u8cfc\u8cb7\u5df2\u7d93\u5beb\u597d\u7684\u8edf\u9ad4\u76f4\u63a5\u4f7f\u7528\u5c31\u884c\uff0c\u4f46\u7562\u7adf\u8cfc\u8cb7\u662f\u8cfc\u8cb7\uff0c\u6709\u4e9b\u756b\u9762\u6216\u662f\u9700\u6c42\u7562\u7adf\u662f\u5957\u88dd\u8edf\u9ad4\u7121\u6cd5\u9054\u6210\u7684\uff0c\u65bc\u662f\u9084\u662f\u5f97\u81ea\u5df1\u5beb\u63a7\u5236\u6307\u4ee4<\/p>\n<p>\u53ef\u4ee5\u81ea\u5df1\u5beb\u4e00\u500b\u985e\u4f3c\u6309\u9375\u7cbe\u9748\u7684\u6771\u6771\uff0c\u4e5f\u5c31\u662f\u63a7\u5236\u6ed1\u9f20\u81ea\u52d5\u5728\u756b\u9762\u4e0a\u64cd\u4f5c\u6771\u897f<\/p>\n<p>\u6ed1\u9f20\u81ea\u52d5\u9ede\u64ca\u7684\u4f8b\u5b50<\/p>\n<p>procedure TForm1.Button1Click(Sender: TObject);<\/p>\n<p>var x,y:integer;<\/p>\n<p>begin<\/p>\n<p>&#160;&#160;&#160; x:= form1.Left+button2.Left+25;<\/p>\n<p>&#160;&#160;&#160; y:= top+button2.Top+27;<\/p>\n<p>&#160;&#160;&#160; SetCursorPos(x,y);&#160;&#160; \/\/ \u79fb\u5230\u67d0\u500b\u9ede<\/p>\n<p>&#160;&#160;&#160; Mouse_Event(MOUSEEVENTF_LEFTDOWN,X,Y,0,0); \/\/ \u6309\u4e0b\u6ed1\u9f20\u5de6\u9375<\/p>\n<p>&#160;&#160;&#160; Mouse_Event(MOUSEEVENTF_LEFTUP,X,Y,0,0);&#160;&#160; \/\/ \u653e\u958b\u5de6\u9375<\/p>\n<p>end;<\/p>\n<p>procedure TForm1.Button2Click(Sender: TObject);<\/p>\n<p>begin<\/p>\n<p>showmessage(&#8216;fksj&#8217;);<\/p>\n<p>end;<\/p>\n<p>*************************************<\/p>\n<p>\u5176\u4e2d mouse_event \u9019\u662f WindowsAPI \u7684\u6307\u4ee4\uff0c<a href=\"http:\/\/xyz566.net\">xyz\u8edf\u9ad4\u88dc\u7d66\u7ad9<\/a><\/p>\n<p>\u9084\u6709\u4e0b\u5217\u7684\u5e7e\u7a2e<\/p>\n<p>MOUSEEVENTF_MOVE&#160;&#160;&#160;&#160;&#160;&#160;&#160;&#160;&#160;&#160;&#160; = $0001; { mouse move }<\/p>\n<p>MOUSEEVENTF_LEFTDOWN&#160;&#160;&#160;&#160;&#160;&#160;&#160; = $0002; { left button down }<\/p>\n<p>MOUSEEVENTF_LEFTUP&#160;&#160;&#160;&#160;&#160;&#160;&#160;&#160;&#160; = $0004; { left button up }<\/p>\n<p>MOUSEEVENTF_RIGHTDOWN&#160;&#160;&#160;&#160;&#160;&#160; = $0008; { right button down }<\/p>\n<p>MOUSEEVENTF_RIGHTUP&#160;&#160;&#160;&#160;&#160;&#160;&#160;&#160; = $0010; { right button up }<\/p>\n<p>MOUSEEVENTF_MIDDLEDOWN&#160;&#160;&#160;&#160;&#160; = $0020; { middle button down }<\/p>\n<p>MOUSEEVENTF_MIDDLEUP&#160;&#160;&#160;&#160;&#160;&#160;&#160; = $0040; { middle button up }<\/p>\n<p>MOUSEEVENTF_WHEEL&#160;&#160;&#160;&#160;&#160;&#160;&#160;&#160;&#160;&#160; = $0800; { wheel button rolled }<\/p>\n<p>MOUSEEVENTF_ABSOLUTE&#160;&#160;&#160;&#160;&#160;&#160;&#160; = $8000; { absolute move }<\/p>\n<p>\u800c\u4e0b\u9762\u7684\u9019\u6bb5\u5247\u662f\u6a21\u64ec\u9375\u76e4<\/p>\n<pre>\/\/Ctrl+C: <\/pre>\n<pre>keybd_event(VK_CONTROL, MapVirtualKey(VK_CONTROL, 0), 0, 0); <\/pre>\n<pre>keybd_event(Ord('C'), MapVirtualKey(Ord('C'), 0), 0, 0); <\/pre>\n<pre>keybd_event(Ord('C'), MapVirtualKey(Ord('C'), 0), KEYEVENTF_KEYUP, 0); <\/pre>\n<pre>keybd_event(VK_CONTROL, MapVirtualKey(VK_CONTROL, 0), KEYEVENTF_KEYUP, 0) <\/pre>\n<pre>&#160;<\/pre>\n<pre>\/\/Ctrl+V: <\/pre>\n<pre>keybd_event(VK_CONTROL, MapVirtualKey(VK_CONTROL, 0), 0, 0); <\/pre>\n<pre>keybd_event(Ord('V'), MapVirtualKey(Ord('V'), 0), 0, 0); <\/pre>\n<pre>keybd_event(Ord('V'), MapVirtualKey(Ord('V'), 0), KEYEVENTF_KEYUP, 0); <\/pre>\n<pre>keybd_event(VK_CONTROL, MapVirtualKey(VK_CONTROL, 0), KEYEVENTF_KEYUP, 0) <\/pre>\n","protected":false},"excerpt":{"rendered":"<p>\u7db2\u8def\u4e0a\u627e\u5230\u7684\u6587\u7ae0\uff0cOrd(&#8216;C&#8217;) &lt;==\u5176\u5be6\u8f49\u51fa\u4f86\u5c31\u662fASCII\u78bc\uff0c\u77e5\u9053\u5f8c\u6bd4\u8f03\u53ef\u4ee5\u9748\u6d3b\u904b\u7528\u5728\u7528\u8b8a\u6578\u7684\u65b9\u5f0f\u5e36\u5165\u3002<\/p>\n<p>&#160;<\/p>\n<p>\u6587\u7ae0\u51fa\u8655\uff1ahttp:\/\/blog.yam.com\/yqbagzdk\/article\/25791738<\/p>\n<p>======================================================<\/p>\n<p>\u6700\u8fd1\u78b0\u5230\u4f7f\u7528 SendMessage \u548c PostMessage \u6a5f\u6703\u8d85\u7d1a\u591a\uff0c\u7121\u975e\u662f\u56e0\u70ba\u592a\u591a\u7684\u7a0b\u5f0f\u5408\u8f2f\u5c08\u6848\u9700\u6c42\uff0c\u5982\u679c\u8017\u8cbb\u4eba\u529b\u5168\u90e8\u81ea\u884c\u958b\u767c\uff0c\u5927\u6982\u8acb\u4e8c\u3001\u4e09\u500d\u7684\u4eba\u529b\u7d50\u679c\u4e5f\u53ea\u662f\u70ba\u4e86\u5b8c\u6210\u5e7e\u500b\u5c0d\u65bc\u5716\u5f62\u8655\u7406\u7684\u52d5\u4f5c\u800c\u5df2\uff0c\u5efa\u7bc9.\u5ba4\u5167\u8a2d\u8a08.\u670d\u88dd\u76f8\u95dc\u8edf\u9ad4\u56e0\u6b64\u8cfc\u8cb7\u5df2\u7d93\u5beb\u597d\u7684\u8edf\u9ad4\u76f4\u63a5\u4f7f\u7528\u5c31\u884c\uff0c\u4f46\u7562\u7adf\u8cfc\u8cb7\u662f\u8cfc\u8cb7\uff0c\u6709\u4e9b\u756b\u9762\u6216\u662f\u9700\u6c42\u7562\u7adf\u662f\u5957\u88dd\u8edf\u9ad4\u7121\u6cd5\u9054\u6210\u7684\uff0c\u65bc\u662f\u9084\u662f\u5f97\u81ea\u5df1\u5beb\u63a7\u5236\u6307\u4ee4<\/p>\n<p>\u53ef\u4ee5\u81ea\u5df1\u5beb\u4e00\u500b\u985e\u4f3c\u6309\u9375\u7cbe\u9748\u7684\u6771\u6771\uff0c\u4e5f\u5c31\u662f\u63a7\u5236\u6ed1\u9f20\u81ea\u52d5\u5728\u756b\u9762\u4e0a\u64cd\u4f5c\u6771\u897f<\/p>\n<p>\u6ed1\u9f20\u81ea\u52d5\u9ede\u64ca\u7684\u4f8b\u5b50<\/p>\n<p>procedure TForm1.Button1Click(Sender: TObject);<\/p>\n<p>var x,y:integer;<\/p>\n<p>begin<\/p>\n<p>&#160;&#160;&#160; x:= form1.Left+button2.Left+25;<\/p>\n<p>&#160;&#160;&#160; y:= top+button2.Top+27;<\/p>\n<p>&#160;&#160;&#160; SetCursorPos(x,y);&#160;&#160; \/\/ \u79fb\u5230\u67d0\u500b\u9ede<\/p>\n<p>&#160;&#160;&#160; Mouse_Event(MOUSEEVENTF_LEFTDOWN,X,Y,0,0); \/\/ \u6309\u4e0b\u6ed1\u9f20\u5de6\u9375<\/p>\n<p>&#160;&#160;&#160; Mouse_Event(MOUSEEVENTF_LEFTUP,X,Y,0,0);&#160;&#160; \/\/ \u653e\u958b\u5de6\u9375<\/p>\n<p>end;<\/p>\n<p>procedure TForm1.Button2Click(Sender: TObject);<\/p>\n<p>begin<\/p>\n<p>showmessage(&#8216;fksj&#8217;);<\/p>\n<p>end;<\/p>\n<p>*************************************<\/p>\n<p>\u5176\u4e2d mouse_event \u9019\u662f WindowsAPI \u7684\u6307\u4ee4\uff0cxyz\u8edf\u9ad4\u88dc\u7d66\u7ad9<\/p>\n<p>\u9084\u6709\u4e0b\u5217\u7684\u5e7e\u7a2e<\/p>\n<p>MOUSEEVENTF_MOVE&#160;&#160;&#160;&#160;&#160;&#160;&#160;&#160;&#160;&#160;&#160; = $0001; { mouse move }<\/p>\n<p>MOUSEEVENTF_LEFTDOWN&#160;&#160;&#160;&#160;&#160;&#160;&#160; = $0002; { left button down }<\/p>\n<p>MOUSEEVENTF_LEFTUP&#160;&#160;&#160;&#160;&#160;&#160;&#160;&#160;&#160; = $0004; { left button up }<\/p>\n<p>MOUSEEVENTF_RIGHTDOWN&#160;&#160;&#160;&#160;&#160;&#160; = $0008; { right button down }<\/p>\n<p>MOUSEEVENTF_RIGHTUP&#160;&#160;&#160;&#160;&#160;&#160;&#160;&#160; [&#8230;]<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"closed","ping_status":"open","sticky":false,"template":"","format":"standard","meta":[],"categories":[3],"tags":[248],"_links":{"self":[{"href":"http:\/\/blog.infinity.idv.tw\/index.php?rest_route=\/wp\/v2\/posts\/251"}],"collection":[{"href":"http:\/\/blog.infinity.idv.tw\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"http:\/\/blog.infinity.idv.tw\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"http:\/\/blog.infinity.idv.tw\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"http:\/\/blog.infinity.idv.tw\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=251"}],"version-history":[{"count":2,"href":"http:\/\/blog.infinity.idv.tw\/index.php?rest_route=\/wp\/v2\/posts\/251\/revisions"}],"predecessor-version":[{"id":567,"href":"http:\/\/blog.infinity.idv.tw\/index.php?rest_route=\/wp\/v2\/posts\/251\/revisions\/567"}],"wp:attachment":[{"href":"http:\/\/blog.infinity.idv.tw\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=251"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"http:\/\/blog.infinity.idv.tw\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=251"},{"taxonomy":"post_tag","embeddable":true,"href":"http:\/\/blog.infinity.idv.tw\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=251"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}