EnableButton，大家自己看看是做什么的吧

游侠无极限

;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> , W3 ]( q+ F( k/ c. M" @7 K. n- y; EnableButton ALL For bbs.xsclub.com . {' Z$ H5 i/ K7 p; E0 W; by 游侠无极限 ;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> ' y* k$ h8 } ^8 j5 l; EndableButton.asm ; 基于对话框资源 ;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> ' C+ k* i% H9 |) F9 l6 e .386 .model flat, stdcall $ v9 `! J, E, x. |' ~ option casemap :none ;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> - } u9 N" ^8 U* g V2 k; Include 文件定义 ;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> include windows.inc include user32.inc 6 Z" @3 V: F$ Q- f. ~: Cincludelib user32.lib 5 t M# ?# O e" j1 L$ dinclude shell32.inc includelib shell32.lib include kernel32.inc , y0 N! X! b4 t7 R, i: f* F: Tincludelib kernel32.lib - y: K/ @+ Z3 W8 z- x4 X9 R;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> * Y' A5 J7 q+ ^: }7 s& K; Equ 等值定义 6 h% e0 @4 j5 m" G# f# M) G;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> ICO_MAIN equ 104 ;图标 % L8 u( S" t4 d lDLG_MAIN equ 101 ;对话框 ( H+ w: D2 J- @' N1 m) |& V2 A3 b0 f p- HEDIT_MAIN equ 1002 ;编辑框 ; x( B/ L) ]7 t% R$ w( Q+ ^ID_ABOUT equ 1000 ;关于按钮 # l4 _. Q9 Z7 {1 W, _1 |;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> ; 数据段 7 T0 C. B4 p* K;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> ! q/ o1 {1 q) o# x) a+ J2 I .data? 7 @8 a, }' u! _) X9 u/ P / j+ T) a. g8 W7 f; RhInstance dd ? $ J& f/ f8 ^4 p$ [8 Y5 r8 MhHook dd ? ; @# C: d% W g7 ~& v: lhWndMain dd ? IsStop dd ? 1 X" h4 R* s4 k' B2 b" l .const szStart db '启动',0 * _, w$ O: X2 b/ H: G8 p" _szStop db '停止',0 - C& t2 f! q4 U3 U& BszCaption db 'EnableButton',0 szInfo db '版权没有 03.8.20 游侠无极限制作',0 2 h+ f/ d2 }) O R+ mszErr db '安装钩子失败，原因不明',0 szWnd db '%lxH',0 ' r- g4 l- w' J, }, A$ ?;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> ( u4 E8 ^$ M8 z. @! l/ A: M# y; 代码段 . l. K7 d% _1 d7 _0 M# w3 S" Q: p;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> 8 p1 `4 Z) X, v0 \5 C) Z W2 Y .code : a, ?8 m6 {# |6 g;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> / {* S7 F: W- o& B: ? C# q) |;钩子回调函数 1 U3 {" @7 X' c* {;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> ; @ Y/ ?$ x5 R3 ?_HookProc proc _dwCode,_wParam,_lParam & s: w9 E( ? r local @szBuffer[100]:byte invoke CallNextHookEx,hHook,_dwCode,_wParam,_lParam ;钩子链传递 pushad 7 d6 }; R( r+ o0 E' i" m .if _dwCode == HC_ACTION ;Windows要移除一条消息时 - j5 Y! k% v* S5 u1 f1 L mov ebx,_lParam * s' T/ T- x" ~" v }$ C3 s5 X/ t! x assume ebx:ptr EVENTMSG .if [ebx].message == WM_LBUTTONDOWN mov eax,[ebx].hwnd ;取得当前鼠标所在控件句柄 invoke wsprintf,addr @szBuffer,addr szWnd,eax invoke SetDlgItemText,hWndMain,EDIT_MAIN,addr @szBuffer ;显示句柄 invoke IsWindowEnabled,[ebx].hwnd ;判断控件是否无效 8 ?8 x5 J' }- ~( a .if eax == FALSE invoke EnableWindow,[ebx].hwnd,TRUE ;使控件可用 .endif ;.endif .endif 5 a2 C2 L% ~3 t assume ebx:nothing T! L4 X4 L; P, r .endif 8 n/ w5 f# X& ^" A0 S popad xor eax,eax ret 4 _+ _/ M v2 W D: y/ O_HookProc endp ;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> ) O$ g; g3 a: h; ?& m9 Z 4 O& R1 f# h0 S_ProcDlgMain proc uses ebx edi esi hWnd,wMsg,wParam,lParam ) @9 ^( r& a" R4 X$ z) Z / j9 k/ Z9 n* C3 v3 a) ? mov eax,wMsg .if eax == WM_CLOSE .if IsStop != TRUE . E9 E0 K* ?6 r8 h8 q& ` invoke UnhookWindowsHookEx,hHook ;卸载钩子 .endif invoke EndDialog,hWnd,NULL .elseif eax == WM_INITDIALOG 1 d# G) t2 j8 U; g invoke LoadIcon,hInstance,ICO_MAIN invoke SendMessage,hWnd,WM_SETICON,ICON_BIG,eax invoke SetWindowPos,hWnd,HWND_TOPMOST,0,0,0,0,SWP_NOMOVE or SWP_NOSIZE ;窗口最顶层 * a, P1 p! D/ [3 V mov IsStop,TRUE / j' n: v! _, ^6 W- O1 x push hWnd & `- k3 |+ m) |, M0 O/ }+ t/ P pop hWndMain ) B0 a4 ^& D2 O& h8 h( _) x .elseif eax == WM_COMMAND ; y: K# s# J# |9 v: n: ~ mov eax,wParam % p$ S1 q" Z& y4 u; I .if ax == IDOK .if IsStop == TRUE ' m# l0 o/ S& E1 W' W invoke SetDlgItemText,hWnd,IDOK,offset szStop : S' ~9 `; f3 u5 @9 M8 i( S invoke SetWindowsHookEx,WH_JOURNALRECORD,addr _HookProc,hInstance,NULL ;挂钩，日志记录钩子 % [+ b4 I" T5 X8 K3 K7 U6 o( g .if eax 2 z* k: m3 ~# h2 M W! ? mov hHook,eax . \) o2 y0 |! Y .else ;挂钩失败 invoke MessageBox,hWnd,offset szErr,offset szCaption,MB_OK or MB_ICONWARNING .endif 5 M5 t1 X( @& ]) ~ mov IsStop,FALSE .else ' ~4 ^3 A' M4 r& {( n invoke SetDlgItemText,hWnd,IDOK,offset szStart 5 h6 ^& ?$ x* t* R* }! } invoke UnhookWindowsHookEx,hHook mov IsStop,TRUE 1 L( N* ~. K j) H' z .endif .elseif ax == IDCANCEL 9 _1 x2 Q$ D. j* u: v invoke SendMessage,hWnd,WM_CLOSE,NULL,NULL * R+ }5 V( o% @' Q( }$ J .elseif ax == ID_ABOUT invoke ShellAbout,hWnd,offset szCaption,offset szInfo,NULL ;关于对话框 .endif .else ! Z G9 S" k+ s* ]5 k, i# | mov eax,FALSE 8 Q* g7 m4 M8 E ret .endif 8 H: o; g- B3 e0 q4 o* t mov eax,TRUE 7 {5 d I- q. B" i ret + y V# O/ B1 Q _ProcDlgMain endp ' f% B. F1 N5 d1 E7 o+ u;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> . I; k( |5 x" wstart: P& i: q. f/ e invoke GetModuleHandle,NULL . J( H/ X& W" N) d2 [* s mov hInstance,eax invoke DialogBoxParam,hInstance,DLG_MAIN,NULL,offset _ProcDlgMain,NULL invoke ExitProcess,NULL ;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> end start ) x6 k" v3 z7 Y. s. C. q/ {0 d: V ! J; U$ h8 T1 z* [ ! B( a# ?5 J$ n1 i6 H/ ~$ m, K- }; [界面看下图片 ! z8 L- V/ ^) Q% i: T + R$ |& x4 k I( V 4 K! G5 a6 R6 N; p5 j6 e 2 [! S( o3 m6 Y+ L% y

[此贴子已经被作者于2003-10-31 23:37:05编辑过]

搞了个WH_JOURNALRECORD hook，大概是把变灰的控件Enable，有点意思
8 o, r+ p- t, W% ?3 M不过这类界面程序实在不是汇编的强项，用了大量的invoke  ，整个程序结构看上去和c别无二致
* `+ p& L0 n0 w3 b9 L" b, D汇编的强项不在这里，楼主如果想显耀汇编的强大，这个例子不怎么，
0 I& ]- n4 L2 V! d- {1 |再来一个强一点的原创瞧瞧 ^_^

( G+ ^+ W+ s* g, z3 X3 E

[此贴子已经被作者于2003-11-1 11:16:10编辑过]

firelinux

bigfoot，留个QQ怎么样。