{"id":220,"date":"2009-02-11T15:59:00","date_gmt":"2009-02-11T07:59:00","guid":{"rendered":""},"modified":"2013-11-18T21:14:35","modified_gmt":"2013-11-18T13:14:35","slug":"delphi%e8%8e%b7%e5%8f%96%e5%8f%a5%e6%9f%84","status":"publish","type":"post","link":"https:\/\/kyle.ai\/blog\/220.html","title":{"rendered":"Delphi\u83b7\u53d6\u53e5\u67c4"},"content":{"rendered":"

\u67e5\u627e\u53e6\u5916\u4e00\u4e2a\u7a97\u53e3\u7684\u53e5\u67c4\uff1a<\/p>\n

\r\nhandle := FindWindow(nil,PChar(\u2018\u7a97\u53e3\u7684\u6807\u9898\u2019));\/\/\u67e5\u5230\u7a97\u4f53\u53e5\u67c4\r\n<\/pre>\n
\u67e5\u627e\u5b50\u7a97\u4f53\uff1a<\/p>\n
\r\nchildHandle := FindWindowEx(handle,0,\u2019\u5b50\u7a97\u4f53\u7c7b\u2019,'\u5b50\u7a97\u4f53\u6807\u9898\u2019);\r\n<\/pre>\n
\u53e6\u5916\u6709\u4e2a\u679a\u4e3e\u5b50\u7a97\u4f53\u7684API\uff0cEnumChildWindows(\u4e3b\u521b\u4f53\u53e5\u67c4,@\u56de\u8c03\u51fd\u6570,\u7528\u6237\u53c2\u6570);
\n\u7528\u8fd9\u4e2a\u51fd\u6570\u9700\u8981\u81ea\u5df1\u5199\u4e00\u4e2a\u56de\u8c03\u7684\u51fd\u6570\uff0c\u6bd4\u5982\uff1a<\/p>\n
\r\nfunction EnumChildProc(ahWND:HWND; param:LPARAM):boolean; stdcall;\r\nsendmessage(handle,message,wl,rl)\r\n<\/pre>\n
 <\/p>\n
\r\nunit Unit1;\r\n\r\ninterface\r\n\r\nuses Windows, Messages,Tlhelp32, SysUtils, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls;\r\n\r\ntype\r\nTForm1 = class(TForm)\r\nprocedure FormCreate(Sender: TObject);\r\n\r\nprivate\r\n{ Private declarations }\r\npublic\r\n{ Public declarations }\r\nend;\r\nvar Form1: TForm1;\r\nimplementation\r\n{$R *.DFM}\r\n\r\nprocedure TForm1.FormCreate(Sender: TObject);\r\nvar a,b:PAnsiChar;\r\nh:HWND;\r\nbegin\r\nh:= FindWindow(nil,\u2019abc.txt \u2013 \u8bb0\u4e8b\u672c\u2019);\r\nh:= FindWindowEx(h,0,\u2019edit\u2019,nil);\r\nSendMessage(h,WM_SETTEXT,255,Integer(PChar(\u2018\u6211\u6765\u6d4b\u5ea6\u4e86\u2019)));\r\nShowMessage( IntToStr(h));\r\nend;\r\n<\/pre>\n
\r\nSendMessage(TreeView.Handle,TVM_SETBKCOLOR,0,RGB(255,0,0));\u3000\u8bbe\u7f6eTV\u80cc\u666f\u989c\u8272\r\nSendMessage(Button.Handle,WM_LBUTTONDOWN,0,0);\u3000\u3000\u9f20\u6807\u5de6\u952e\u6309\u4e0b\r\nSendMessage(Button.Handle,WM_LBUTTONUP,0,0);\u3000\u3000\u3000\u9f20\u6807\u5de6\u952e\u62ac\u8d77\r\nSendMessage(Edit.Handle,WM_SETTEXT,255,Integer(PChar(\u2018abc\u2019)));\u3000\u4f20\u9012\u6587\u672c\r\nSendMessage(Edit.Handle,WM_Char,Wparam(\u2018Q\u2019),2);\u3000\u3000\u4f20\u9012\u5b57\u7b26\r\nSendMessage(Button.Handle,BM_SETSTYLE,BS_RADIOBUTTON,1);\u3000\u3000\u6539\u53d8Button\u98ce\u683c\r\nSendMessage(ComboBox.Handle,CB_SETDropPEDWIDTH,300,0);\u3000\u3000\u6539\u53d8CBDownWidth\r\nWM_CUT\u3001WM_COPY\u548cWM_PASTE\u3000\u3000\u526a\u5207\uff0c\u590d\u5236\uff0c\u7c98\u5e16\r\n\u5b9e\u73b0\u4efb\u610f\u7ec4\u5408\u952e\r\nkeybd_event(VK_Control, MapVirtualKey(VK_Control, 0), 0, 0);\r\nkeybd_event(ord(\u2018V\u2019), MapVirtualKey(ord(\u2018V\u2019), 0), 0, 0);\r\nkeybd_event(ord(\u2018V\u2019), MapVirtualKey(ord(\u2018V\u2019), 0), KEYEVENTF_KEYUP, 0);\r\nkeybd_event(VK_Control, MapVirtualKey(VK_Control, 0), KEYEVENTF_KEYUP, 0);\r\n<\/pre>\n
SendMessageA
\n\u8bf4\u660e: \u8c03\u7528\u4e00\u4e2a\u7a97\u53e3\u7684\u7a97\u53e3\u51fd\u6570\uff0c\u5c06\u4e00\u6761\u6d88\u606f\u53d1\u7ed9\u90a3\u4e2a\u7a97\u53e3\u3002\u9664\u975e\u6d88\u606f\u5904\u7406\u5b8c\u6bd5\uff0c\u5426\u5219\u8be5\u51fd\u6570\u4e0d\u4f1a\u8fd4\u56deSendMessage\u6240\u5305\u542b4\u4e2a\u53c2\u6570:
\n1. hwnd 32\u4f4d\u7684\u7a97\u53e3\u53e5\u67c4\u7a97\u53e3\u53ef\u4ee5\u662f\u4efb\u4f55\u7c7b\u578b\u7684\u5c4f\u5e55\u5bf9\u8c61\uff0c\u56e0\u4e3aWin32\u80fd\u591f\u7ef4\u62a4\u5927\u591a\u6570\u53ef\u89c6\u5bf9\u8c61\u7684\u53e5\u67c4
\n2. wMsg \u7528\u4e8e\u533a\u522b\u5176\u4ed6\u6d88\u606f\u7684\u5e38\u91cf\u503c\uff0c\u8fd9\u4e9b\u5e38\u91cf\u53ef\u4ee5\u662fWindows\u5355\u5143\u4e2d\u9884\u5b9a\u4e49\u7684\u5e38\u91cf\uff0c\u4e5f\u53ef\u4ee5\u662f\u81ea\u5b9a\u4e49\u7684\u5e38\u91cf
\n3. wParam \u901a\u5e38\u662f\u4e00\u4e2a\u4e0e\u6d88\u606f\u6709\u5173\u7684\u5e38\u91cf\u503c\uff0c\u4e5f\u53ef\u80fd\u662f\u7a97\u53e3\u6216\u63a7\u4ef6\u7684\u53e5\u67c4
\n4. lParam \u901a\u5e38\u662f\u4e00\u4e2a\u6307\u5411\u5185\u5b58\u4e2d\u6570\u636e\u7684\u6307\u9488\u3002\u7531\u4e8eWParm\u3001lParam\u548cPointer\u90fd\u662f32\u4f4d\u7684\uff0c\u56e0\u6b64\uff0c\u5b83\u4eec\u4e4b\u95f4\u53ef\u4ee5\u76f8\u4e92\u8f6c\u6362<\/p>\n
wMsg\u51fd\u6570
\n\u2605WM_Create \u521b\u5efa\u4e00\u4e2a\u7a97\u53e3
\n\u2605WM_DESTROY \u5f53\u4e00\u4e2a\u7a97\u53e3\u88ab\u7834\u574f\u65f6\u53d1\u9001
\n\u2605WM_MOVE \u79fb\u52a8\u4e00\u4e2a\u7a97\u53e3
\n\u2605WM_SIZE \u6539\u53d8\u4e00\u4e2a\u7a97\u53e3\u7684\u5927\u5c0f
\n\u2605WM_ACTIVATE \u4e00\u4e2a\u7a97\u53e3\u88ab\u6fc0\u6d3b\u6216\u5931\u53bb\u6fc0\u6d3b\u72b6\u6001
\n\u2605WM_SETFOCUS \u4e00\u4e2a\u7a97\u53e3\u83b7\u5f97\u7126\u70b9
\n\u2605WM_KILLFOCUS \u4e00\u4e2a\u7a97\u53e3\u5931\u53bb\u7126\u70b9
\n\u2605WM_ENABLE \u4e00\u4e2a\u7a97\u53e3\u6539\u53d8\u6210Enable\u72b6\u6001
\n\u2605WM_SETREDRAW \u8bbe\u7f6e\u7a97\u53e3\u662f\u5426\u80fd\u91cd\u753b
\n\u2605WM_SETTEXT \u5e94\u7528\u7a0b\u5e8f\u53d1\u9001\u6b64\u6d88\u606f\u6765\u8bbe\u7f6e\u4e00\u4e2a\u7a97\u53e3\u7684\u6587\u672c
\n\u2605WM_GETTEXT \u5e94\u7528\u7a0b\u5e8f\u53d1\u9001\u6b64\u6d88\u606f\u6765\u590d\u5236\u5bf9\u5e94\u7a97\u53e3\u7684\u6587\u672c\u5230\u7f13\u51b2\u533a
\n\u2605WM_GETTEXTLENGTH \u5f97\u5230\u4e0e\u4e00\u4e2a\u7a97\u53e3\u6709\u5173\u7684\u6587\u672c\u7684\u957f\u5ea6\uff08\u4e0d\u5305\u542b\u7a7a\u5b57\u7b26\uff09
\n\u2605WM_PAINT \u8981\u6c42\u4e00\u4e2a\u7a97\u53e3\u91cd\u753b\u81ea\u5df1
\n\u2605WM_CLOSE \u5f53\u4e00\u4e2a\u7a97\u53e3\u6216\u5e94\u7528\u7a0b\u5e8f\u8981\u5173\u95ed\u65f6\u53d1\u9001\u4e00\u4e2a\u4fe1\u53f7
\n\u2605WM_QUERYENDSESSION \u7528\u6237\u9009\u62e9\u7ed3\u675f\u5bf9\u8bdd\u6846\u6216\u7a0b\u5e8f\u81ea\u5df1\u8c03\u7528ExitWindows\u51fd\u6570
\n\u2605WM_QUIT \u7528\u6765\u7ed3\u675f\u7a0b\u5e8f\u8fd0\u884c
\n\u2605WM_QUERYOPEN \u7528\u6237\u7a97\u53e3\u6062\u590d\u4ee5\u524d\u7684\u5927\u5c0f\u4f4d\u7f6e\u65f6\uff0c\u628a\u6b64\u6d88\u606f\u53d1\u9001\u7ed9\u67d0\u4e2a\u56fe\u6807
\n\u2605WM_ERASEBKGND \u5f53\u7a97\u53e3\u80cc\u666f\u5fc5\u987b\u88ab\u64e6\u9664\u65f6\uff08\u4f8b\u5728\u7a97\u53e3\u6539\u53d8\u5927\u5c0f\u65f6\uff09
\n\u2605WM_SYSCOLORCHANGE \u5f53\u7cfb\u7edf\u989c\u8272\u6539\u53d8\u65f6\uff0c\u53d1\u9001\u6b64\u6d88\u606f\u7ed9\u6240\u6709\u9876\u7ea7\u7a97\u53e3
\n\u2605WM_QUERYENDSESSION \u6d88\u606f\u540e\uff0c\u6b64\u6d88\u606f\u53d1\u9001\u7ed9\u5e94\u7528\u7a0b\u5e8f\uff0c\u901a\u77e5\u5b83\u5bf9\u8bdd\u662f\u5426\u7ed3\u675f
\n\u2605WM_SHOWWINDOW \u5f53\u9690\u85cf\u6216\u663e\u793a\u7a97\u53e3\u662f\u53d1\u9001\u6b64\u6d88\u606f\u7ed9\u8fd9\u4e2a\u7a97\u53e3
\n\u2605WM_ACTIVATEAPP \u53d1\u6b64\u6d88\u606f\u7ed9\u5e94\u7528\u7a0b\u5e8f\u54ea\u4e2a\u7a97\u53e3\u662f\u6fc0\u6d3b\u7684\uff0c\u54ea\u4e2a\u662f\u975e\u6fc0\u6d3b\u7684
\n\u2605WM_FONTCHANGE \u5f53\u7cfb\u7edf\u7684\u5b57\u4f53\u8d44\u6e90\u5e93\u53d8\u5316\u65f6\u53d1\u9001\u6b64\u6d88\u606f\u7ed9\u6240\u6709\u9876\u7ea7\u7a97\u53e3
\n\u2605WM_TIMECHANGE \u5f53\u7cfb\u7edf\u7684\u65f6\u95f4\u53d8\u5316\u65f6\u53d1\u9001\u6b64\u6d88\u606f\u7ed9\u6240\u6709\u9876\u7ea7\u7a97\u53e3
\n\u2605WM_CANCELMODE \u53d1\u9001\u6b64\u6d88\u606f\u6765\u53d6\u6d88\u67d0\u79cd\u6b63\u5728\u8fdb\u884c\u7684\u6478\u6001\uff08\u64cd\u4f5c\uff09
\n\u2605WM_SETCURSOR \u5982\u679c\u9f20\u6807\u5f15\u8d77\u5149\u6807\u5728\u67d0\u4e2a\u7a97\u53e3\u4e2d\u79fb\u52a8
\n\u2605WM_ENDSESSION \u5f53\u7cfb\u7edf\u8fdb\u7a0b\u53d1\u51fa\u4e14\u9f20\u6807\u8f93\u5165\u6ca1\u6709\u88ab\u6355\u83b7\u65f6\uff0c\u5c31\u53d1\u6d88\u606f\u7ed9\u67d0\u4e2a\u7a97\u53e3
\n\u2605WM_MOUSEACTIVATE \u5f53\u5149\u6807\u5728\u67d0\u4e2a\u975e\u6fc0\u6d3b\u7684\u7a97\u53e3\u4e2d\u800c\u7528\u6237\u6b63\u6309\u7740\u9f20\u6807\u7684\u67d0\u4e2a\u952e\u53d1\u9001\u6b64\u6d88\u606f\u7ed9\u5f53\u524d\u7a97\u53e3
\n\u2605WM_CHILDACTIVATE \u9001\u6b64\u6d88\u606f\u7ed9MDI\u5b50\u7a97\u53e3\u5f53\u7528\u6237\u70b9\u51fb\u6b64\u7a97\u53e3\u7684\u6807\u9898\u680f\uff0c\u6216\u5f53\u7a97\u53e3\u88ab\u6fc0\u6d3b\uff0c\u79fb\u52a8\uff0c\u6539\u53d8\u5927\u5c0f
\n\u2605WM_QUEUESYNC \u6b64\u6d88\u606f\u7531\u57fa\u4e8e\u8ba1\u7b97\u673a\u7684\u8bad\u7ec3\u7a0b\u5e8f\u53d1\u9001,\u901a\u8fc7 WH_JOURNALPALYBACK\u7684hook\u7a0b\u5e8f\u5206\u79bb\u51fa\u7528\u6237\u8f93\u5165\u6d88\u606f
\n\u2605WM_GETMINMAXINFO \u6b64\u6d88\u606f\u53d1\u9001\u7ed9\u7a97\u53e3\u5f53\u5b83\u5c06\u8981\u6539\u53d8\u5927\u5c0f\u6216\u4f4d\u7f6e
\n\u2605WM_PAINTICON \u53d1\u9001\u7ed9\u6700\u5c0f\u5316\u7a97\u53e3\u5f53\u5b83\u56fe\u6807\u5c06\u8981\u88ab\u91cd\u753b
\n\u2605WM_ICONERASEBKGND \u6b64\u6d88\u606f\u53d1\u9001\u7ed9\u67d0\u4e2a\u6700\u5c0f\u5316\u7a97\u53e3\uff0c\u4ec5\u5f53\u5b83\u5728\u753b\u56fe\u6807\u524d\u5b83\u7684\u80cc\u666f\u5fc5\u987b\u88ab\u91cd\u753b
\n\u2605WM_NEXTDLGCT\u2605\u53d1\u9001\u6b64\u6d88\u606f\u7ed9\u4e00\u4e2a\u5bf9\u8bdd\u6846\u7a0b\u5e8f\u53bb\u66f4\u6539\u7126\u70b9\u4f4d\u7f6e
\n\u2605WM_SPOOLERSTATUS \u6bcf\u5f53\u6253\u5370\u7ba1\u7406\u5217\u961f\u589e\u52a0\u6216\u51cf\u5c11\u4e00\u6761\u4f5c\u4e1a\u65f6\u53d1\u51fa\u6b64\u6d88\u606f
\n\u2605WM_DRAWITEM \u5f53button\uff0ccombobox\uff0clistbox\uff0cmenu\u7684\u53ef\u89c6\u5916\u89c2\u6539\u53d8\u65f6\u53d1\u9001
\n\u2605WM_MEASUREITEM \u5f53button, combobox, listbox, listview control, or menuitem \u88ab\u521b\u5efa\u65f6
\n\u2605WM_VKEYTOITEM \u6b64\u6d88\u606f\u6709\u4e00\u4e2aLBS_WANTKEYBOARDINPUT\u98ce\u683c\u7684\u53d1\u51fa\u7ed9\u5b83\u7684\u6240\u6709\u8005\u6765\u54cd\u5e94WM_KEYDOWN\u6d88\u606f
\n\u2605WM_CHARTOITEM \u6b64\u6d88\u606f\u7531\u4e00\u4e2aLBS_WANTKEYBOARDINPUT\u98ce\u683c\u7684\u5217\u8868\u6846\u53d1\u9001\u7ed9\u4ed6\u7684\u6240\u6709\u8005\u6765\u54cd\u5e94WM_CHAR\u6d88\u606f
\n\u2605WM_SETFONT \u5f53\u7ed8\u5236\u6587\u672c\u65f6\u7a0b\u5e8f\u53d1\u9001\u6b64\u6d88\u606f\u5f97\u5230\u63a7\u4ef6\u8981\u7528\u7684\u989c\u8272
\n\u2605WM_GETFONT \u5e94\u7528\u7a0b\u5e8f\u53d1\u9001\u6b64\u6d88\u606f\u5f97\u5230\u5f53\u524d\u63a7\u4ef6\u7ed8\u5236\u6587\u672c\u7684\u5b57\u4f53
\n\u2605WM_SETHOTKEY \u5e94\u7528\u7a0b\u5e8f\u53d1\u9001\u6b64\u6d88\u606f\u8ba9\u4e00\u4e2a\u7a97\u53e3\u4e0e\u4e00\u4e2a\u70ed\u952e\u76f8\u5173\u8fde
\n\u2605WM_GETHOTKEY \u5e94\u7528\u7a0b\u5e8f\u53d1\u9001\u6b64\u6d88\u606f\u6765\u5224\u65ad\u70ed\u952e\u4e0e\u67d0\u4e2a\u7a97\u53e3\u662f\u5426\u6709\u5173\u8054
\n\u2605WM_QUERYDRAGICON \u6b64\u6d88\u606f\u53d1\u9001\u7ed9\u6700\u5c0f\u5316\u7a97\u53e3\uff0c\u5f53\u6b64\u7a97\u53e3\u5c06\u8981\u88ab\u62d6\u653e\u800c\u5b83\u7684\u7c7b\u4e2d\u6ca1\u6709\u5b9a\u4e49\u56fe\u6807\uff0c\u5e94\u7528\u7a0b\u5e8f\u80fd\u8fd4\u56de\u4e00\u4e2a\u56fe\u6807\u6216\u5149\u6807\u7684\u53e5\u67c4\uff0c\u5f53\u7528\u6237\u62d6\u653e\u56fe\u6807\u65f6\u7cfb\u7edf\u663e\u793a\u8fd9\u4e2a\u56fe\u6807\u6216\u5149\u6807
\n\u2605WM_COMPAREITEM \u53d1\u9001\u6b64\u6d88\u606f\u6765\u5224\u5b9acombobox\u6216listbox\u65b0\u589e\u52a0\u7684\u9879\u7684\u76f8\u5bf9\u4f4d\u7f6e
\n\u2605WM_COMPACTING \u663e\u793a\u5185\u5b58\u5df2\u7ecf\u5f88\u5c11\u4e86
\n\u2605WM_WINDOWPOSCHANGING \u53d1\u9001\u6b64\u6d88\u606f\u7ed9\u90a3\u4e2a\u7a97\u53e3\u7684\u5927\u5c0f\u548c\u4f4d\u7f6e\u5c06\u8981\u88ab\u6539\u53d8\u65f6\uff0c\u6765\u8c03\u7528setwindowpos\u51fd\u6570\u6216\u5176\u5b83\u7a97\u53e3\u7ba1\u7406\u51fd\u6570
\n\u2605WM_WINDOWPOSCHANGED \u53d1\u9001\u6b64\u6d88\u606f\u7ed9\u90a3\u4e2a\u7a97\u53e3\u7684\u5927\u5c0f\u548c\u4f4d\u7f6e\u5df2\u7ecf\u88ab\u6539\u53d8\u65f6\uff0c\u6765\u8c03\u7528setwindowpos\u51fd\u6570\u6216\u5176\u5b83\u7a97\u53e3\u7ba1\u7406\u51fd\u6570
\n\u2605WM_POWER \u5f53\u7cfb\u7edf\u5c06\u8981\u8fdb\u5165\u6682\u505c\u72b6\u6001\u65f6\u53d1\u9001\u6b64\u6d88\u606f
\n\u2605WM_COPYDATA \u5f53\u4e00\u4e2a\u5e94\u7528\u7a0b\u5e8f\u4f20\u9012\u6570\u636e\u7ed9\u53e6\u4e00\u4e2a\u5e94\u7528\u7a0b\u5e8f\u65f6\u53d1\u9001\u6b64\u6d88\u606f
\n\u2605WM_CANCELJOURNA \u5f53\u67d0\u4e2a\u7528\u6237\u53d6\u6d88\u7a0b\u5e8f\u65e5\u5fd7\u6fc0\u6d3b\u72b6\u6001\uff0c\u63d0\u4ea4\u6b64\u6d88\u606f\u7ed9\u7a0b\u5e8f
\n\u2605WM_NOTIFY \u5f53\u67d0\u4e2a\u63a7\u4ef6\u7684\u67d0\u4e2a\u4e8b\u4ef6\u5df2\u7ecf\u53d1\u751f\u6216\u8fd9\u4e2a\u63a7\u4ef6\u9700\u8981\u5f97\u5230\u4e00\u4e9b\u4fe1\u606f\u65f6\uff0c\u53d1\u9001\u6b64\u6d88\u606f\u7ed9\u5b83\u7684\u7236\u7a97\u53e3
\n\u2605WM_INPUTLANGCHANGEREQUEST \u5f53\u7528\u6237\u9009\u62e9\u67d0\u79cd\u8f93\u5165\u8bed\u8a00\uff0c\u6216\u8f93\u5165\u8bed\u8a00\u7684\u70ed\u952e\u6539\u53d8
\n\u2605WM_INPUTLANGCHANGE \u5f53\u5e73\u53f0\u73b0\u573a\u5df2\u7ecf\u88ab\u6539\u53d8\u540e\u53d1\u9001\u6b64\u6d88\u606f\u7ed9\u53d7\u5f71\u54cd\u7684\u6700\u9876\u7ea7\u7a97\u53e3
\n\u2605WM_TCARD \u5f53\u7a0b\u5e8f\u5df2\u7ecf\u521d\u59cb\u5316windows\u5e2e\u52a9\u4f8b\u7a0b\u65f6\u53d1\u9001\u6b64\u6d88\u606f\u7ed9\u5e94\u7528\u7a0b\u5e8f
\n\u2605WM_HELP \u6b64\u6d88\u606f\u663e\u793a\u7528\u6237\u6309\u4e0b\u4e86F1\uff0c\u5982\u679c\u67d0\u4e2a\u83dc\u5355\u662f\u6fc0\u6d3b\u7684\uff0c\u5c31\u53d1\u9001\u6b64\u6d88\u606f\u4e2a\u6b64\u7a97\u53e3\u5173\u8054\u7684\u83dc\u5355\uff0c\u5426\u5219\u5c31\u53d1\u9001\u7ed9\u6709\u7126\u70b9\u7684\u7a97\u53e3\uff0c\u5982\u679c\u5f53\u524d\u90fd\u6ca1\u6709\u7126\u70b9\uff0c\u5c31\u628a\u6b64\u6d88\u606f\u53d1\u9001\u7ed9\u5f53\u524d\u6fc0\u6d3b\u7684\u7a97\u53e3
\n\u2605WM_USERCHANGED \u5f53\u7528\u6237\u5df2\u7ecf\u767b\u5165\u6216\u9000\u51fa\u540e\u53d1\u9001\u6b64\u6d88\u606f\u7ed9\u6240\u6709\u7684\u7a97\u53e3\uff0c\u5f53\u7528\u6237\u767b\u5165\u6216\u9000\u51fa\u65f6\u7cfb\u7edf\u66f4\u65b0\u7528\u6237\u7684\u5177\u4f53\u8bbe\u7f6e\u4fe1\u606f\uff0c\u5728\u7528\u6237\u66f4\u65b0\u8bbe\u7f6e\u65f6\u7cfb\u7edf\u9a6c\u4e0a\u53d1\u9001\u6b64\u6d88\u606f
\n\u2605WM_NOTIFYFORMAT \u516c\u7528\u63a7\u4ef6\uff0c\u81ea\u5b9a\u4e49\u63a7\u4ef6\u548c\u4ed6\u4eec\u7684\u7236\u7a97\u53e3\u901a\u8fc7\u6b64\u6d88\u606f\u6765\u5224\u65ad\u63a7\u4ef6\u662f\u4f7f\u7528ANSI\u8fd8\u662fUNICODE\u7ed3\u6784<\/p>\n
\r\nfunction EnumChildWindowsProc(hwnd, lparam: Integer): Boolean;\r\nvar\r\nbuffer: array[0..255] of char;\r\nbegin\r\nResult := True;\r\nGetClassName(hwnd,buffer,256);\r\nif StrPas(Buffer)=\u2019Edit\u2019 then\r\nbegin\r\nSendMessage(hwnd,WM_GETTEXT,256,lparam);\r\nResult:=False;\r\nend;\r\nend;\r\n\r\nprocedure TForm1.Button1Click(Sender: TObject);\r\nvar\r\nhwnd: Integer;\r\nbuffer: array[0..255] of char;\r\nBegin\r\nhwnd := FindWindow(\u2018CabinetWClass\u2019,nil);\r\nif hwnd<> 0 then\r\nbegin\r\nEnumChildWindows(hwnd,@EnumChildWindowsProc,Longint(@buffer[0]));\r\nCaption := StrPas(buffer);\r\nend;\r\nend;\r\n<\/pre>\n","protected":false},"excerpt":{"rendered":"
\u67e5\u627e\u53e6\u5916\u4e00\u4e2a\u7a97\u53e3\u7684\u53e5\u67c4\uff1a handle := FindWindow(nil,PChar(\u2018\u7a97\u53e3\u7684\u6807\u9898\u2019));\/ […]<\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"open","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[6],"tags":[],"class_list":["post-220","post","type-post","status-publish","format-standard","hentry","category-code_related"],"_links":{"self":[{"href":"https:\/\/kyle.ai\/blog\/wp-json\/wp\/v2\/posts\/220","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/kyle.ai\/blog\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/kyle.ai\/blog\/wp-json\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/kyle.ai\/blog\/wp-json\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/kyle.ai\/blog\/wp-json\/wp\/v2\/comments?post=220"}],"version-history":[{"count":1,"href":"https:\/\/kyle.ai\/blog\/wp-json\/wp\/v2\/posts\/220\/revisions"}],"predecessor-version":[{"id":4798,"href":"https:\/\/kyle.ai\/blog\/wp-json\/wp\/v2\/posts\/220\/revisions\/4798"}],"wp:attachment":[{"href":"https:\/\/kyle.ai\/blog\/wp-json\/wp\/v2\/media?parent=220"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/kyle.ai\/blog\/wp-json\/wp\/v2\/categories?post=220"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/kyle.ai\/blog\/wp-json\/wp\/v2\/tags?post=220"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}