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

游侠无极限

;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> 9 |$ v( E( l9 Y+ s; EnableButton ALL For bbs.xsclub.com ; by 游侠无极限 ;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> ; EndableButton.asm ; 基于对话框资源 9 e" c- A0 G, e6 n;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> .386 , Z/ v) D' }4 w, |+ X; C .model flat, stdcall $ `$ a2 [1 Q0 l+ j% n# w option casemap :none E0 c1 C" y9 i: ^! N;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> / t# v+ ^! t2 |& F1 k; Include 文件定义 8 U2 H* C: V+ X+ X- q8 a* {;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> include windows.inc include user32.inc & Z7 Y. w: m% V `; H7 T, gincludelib user32.lib include shell32.inc 2 z+ c8 x$ C2 i8 tincludelib shell32.lib $ M' n! k0 _( Linclude kernel32.inc + T- B( i$ Q6 m, e, Nincludelib kernel32.lib ;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> ; Equ 等值定义 ;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> ! k8 ]' e: F6 E) c% i" D9 HICO_MAIN equ 104 ;图标 % F8 @% D+ D2 D2 XDLG_MAIN equ 101 ;对话框 EDIT_MAIN equ 1002 ;编辑框 ID_ABOUT equ 1000 ;关于按钮 ;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> ; 数据段 ;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> .data? hInstance dd ? hHook dd ? hWndMain dd ? IsStop dd ? 9 o+ ~: g* {! h/ w( ~. S( r# P0 \ .const szStart db '启动',0 ; c D! O$ o- _" u. o0 SszStop db '停止',0 9 d, H: t# Q p% o2 }szCaption db 'EnableButton',0 szInfo db '版权没有 03.8.20 游侠无极限制作',0 / m) L3 h9 \5 `szErr db '安装钩子失败，原因不明',0 szWnd db '%lxH',0 ;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> ; 代码段 ;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> .code ; w+ g9 C u0 E" z) L9 g/ r, p;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> ;钩子回调函数 + |/ v' H, e2 o! r2 [1 q2 G;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> , r# ^! u8 a+ v% j5 Y+ u2 ~% ^_HookProc proc _dwCode,_wParam,_lParam - D5 d# r5 I% r+ f" ? local @szBuffer[100]:byte ' Q( M$ M1 b5 J+ h7 Z invoke CallNextHookEx,hHook,_dwCode,_wParam,_lParam ;钩子链传递 pushad .if _dwCode == HC_ACTION ;Windows要移除一条消息时 mov ebx,_lParam assume ebx:ptr EVENTMSG " x) N' \8 O+ [' }$ \) i+ V5 { .if [ebx].message == WM_LBUTTONDOWN $ r+ [* M3 f* e3 o mov eax,[ebx].hwnd ;取得当前鼠标所在控件句柄 2 r! [7 R: k2 ? invoke wsprintf,addr @szBuffer,addr szWnd,eax invoke SetDlgItemText,hWndMain,EDIT_MAIN,addr @szBuffer ;显示句柄 ) B' V; f- P6 u1 x G2 r5 [9 y invoke IsWindowEnabled,[ebx].hwnd ;判断控件是否无效 .if eax == FALSE - u, N1 g" ~9 u" M invoke EnableWindow,[ebx].hwnd,TRUE ;使控件可用 9 f5 y4 A1 r) N. r* [% d .endif ;.endif .endif 1 L5 @0 a7 C8 E2 b) `' C; T& C% M3 s assume ebx:nothing 0 X1 F3 o% N& `- j$ T1 H7 e .endif / q4 C) `0 H/ I1 o9 Z4 n popad xor eax,eax ret " ^3 v5 p: }0 B0 v4 B Z/ I_HookProc endp 9 y1 {- q# n/ R$ _;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> _ProcDlgMain proc uses ebx edi esi hWnd,wMsg,wParam,lParam mov eax,wMsg + `7 O8 K4 M1 n& G .if eax == WM_CLOSE .if IsStop != TRUE ) b6 Y( ]; W/ z) [& d0 f invoke UnhookWindowsHookEx,hHook ;卸载钩子 & Y& Q9 y! D# F* i( H N .endif % A m) m: J b+ Z0 S- E( Z2 v8 Z invoke EndDialog,hWnd,NULL .elseif eax == WM_INITDIALOG - l: S) ^8 g; m2 A; l1 s invoke LoadIcon,hInstance,ICO_MAIN invoke SendMessage,hWnd,WM_SETICON,ICON_BIG,eax ; P+ l# f" g* D7 y, e! d: L invoke SetWindowPos,hWnd,HWND_TOPMOST,0,0,0,0,SWP_NOMOVE or SWP_NOSIZE ;窗口最顶层 mov IsStop,TRUE 1 ?# h/ t: f/ D3 {/ u" | push hWnd pop hWndMain .elseif eax == WM_COMMAND mov eax,wParam .if ax == IDOK .if IsStop == TRUE invoke SetDlgItemText,hWnd,IDOK,offset szStop invoke SetWindowsHookEx,WH_JOURNALRECORD,addr _HookProc,hInstance,NULL ;挂钩，日志记录钩子 # j9 c; z: x' p/ S) V1 I- ?) e .if eax mov hHook,eax # n3 z+ p; ~4 Z/ h .else ;挂钩失败 , [+ q; z' B0 Y- H) z! z" n invoke MessageBox,hWnd,offset szErr,offset szCaption,MB_OK or MB_ICONWARNING w4 i0 ~, A8 K1 w$ _0 Q .endif mov IsStop,FALSE .else invoke SetDlgItemText,hWnd,IDOK,offset szStart ! ]- y9 i* `& ^6 Q( m v( X invoke UnhookWindowsHookEx,hHook mov IsStop,TRUE ) u, p1 F+ }: `% v2 j" ? .endif .elseif ax == IDCANCEL & T2 h8 s# S+ V9 t$ v* W. H1 p invoke SendMessage,hWnd,WM_CLOSE,NULL,NULL , ?' E& Q5 r3 n5 |- Y; n: C O .elseif ax == ID_ABOUT invoke ShellAbout,hWnd,offset szCaption,offset szInfo,NULL ;关于对话框 .endif / @' E7 r8 Y& Y3 c+ e, h8 m+ X' N .else ( f& B! o" }6 ?. m; _$ x8 U% \% [ mov eax,FALSE ret " o" z" T$ T: R! y! V .endif mov eax,TRUE + C) l* i/ O2 w! j9 | ret 8 J. y$ O% w! q+ Y9 ? _ProcDlgMain endp " t2 S X6 ]# V# F;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> , W% b5 _1 _$ m! nstart: ' R2 g/ J4 {8 y; a2 X! ] invoke GetModuleHandle,NULL - z/ P, H) A3 f. V mov hInstance,eax 4 M) o% r9 {* _* u. z: u0 c2 i# x8 {5 F invoke DialogBoxParam,hInstance,DLG_MAIN,NULL,offset _ProcDlgMain,NULL 4 _3 |* b# G0 n* E- L invoke ExitProcess,NULL & F- `+ \1 q7 s0 O;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> end start 4 d6 \4 @/ Y3 b0 W+ o' [1 \ ; m1 n Q: c2 W& ?; A8 B- Q界面看下图片 2 R3 F0 ]; `- Z' T 5 A+ S6 X. I' V n 9 u5 M8 @( N# o7 b! L1 H8 d 0 `0 K7 b+ f- k3 v. z% x/ k 1 u& c" t5 o2 `2 n/ u9 j& {' G 7 R8 b- r) t6 m; p: J9 G

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

搞了个WH_JOURNALRECORD hook，大概是把变灰的控件Enable，有点意思
# w1 V9 I+ u  S不过这类界面程序实在不是汇编的强项，用了大量的invoke  ，整个程序结构看上去和c别无二致
汇编的强项不在这里，楼主如果想显耀汇编的强大，这个例子不怎么，
* W8 M/ l7 i  R! Z9 y% n再来一个强一点的原创瞧瞧 ^_^

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

firelinux

bigfoot，留个QQ怎么样。