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

游侠无极限

;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> / E6 o L+ H/ }& n+ O; EnableButton ALL For bbs.xsclub.com ; by 游侠无极限 ;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> ; EndableButton.asm , ], Z$ u9 b) d( K; 基于对话框资源 ;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> + j5 }( Q) C s+ I' i .386 .model flat, stdcall 5 D1 @- V4 }! I# `0 W option casemap :none 0 R$ k6 |2 M( Q;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> ; Include 文件定义 2 q, f8 S4 L9 z3 D;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> include windows.inc include user32.inc : K# N3 |. n5 G T8 {includelib user32.lib include shell32.inc includelib shell32.lib ! T- d9 d/ _5 _: ginclude kernel32.inc 4 o; c# ^) R5 H# hincludelib kernel32.lib - n5 B8 W2 e4 q0 } x;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> ; Equ 等值定义 ;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> : D; l$ @9 M3 |, }' ?ICO_MAIN equ 104 ;图标 DLG_MAIN equ 101 ;对话框 EDIT_MAIN equ 1002 ;编辑框 ID_ABOUT equ 1000 ;关于按钮 # }" Q4 B {3 [;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> ; 数据段 0 P- D/ A' M6 p) }& O+ C9 F;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> .data? hInstance dd ? , I& |4 ]. B! p1 b* t- ThHook dd ? 4 A( D* j! W0 u& e4 x+ whWndMain dd ? U0 p5 E1 S7 h/ nIsStop dd ? .const szStart db '启动',0 szStop db '停止',0 szCaption db 'EnableButton',0 9 }' K' w5 W# J& g0 {9 e9 z8 zszInfo db '版权没有 03.8.20 游侠无极限制作',0 szErr db '安装钩子失败，原因不明',0 ! p7 W$ c! T, V: R u9 N pszWnd db '%lxH',0 $ A9 h3 ^, s. p( p1 |3 P* B;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> ) K/ n6 ]' {2 s- a2 A; 代码段 3 y! E$ P! w0 f+ U;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> .code 0 y. \1 G" \3 w( u, z0 @;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> ;钩子回调函数 * r, L+ K* L/ H, `& t( m) e2 m;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> _HookProc proc _dwCode,_wParam,_lParam 6 u l5 W8 t8 _3 d3 h6 t local @szBuffer[100]:byte % F3 l2 ~0 m1 p0 d! v invoke CallNextHookEx,hHook,_dwCode,_wParam,_lParam ;钩子链传递 & }4 x( I+ j' F+ N4 \, R! A; m+ S3 ^1 S pushad # U0 \5 g4 N+ C( _1 O! ~# v4 { .if _dwCode == HC_ACTION ;Windows要移除一条消息时 - ?3 m0 k9 B) a: z A5 I mov ebx,_lParam ' x9 J. Y1 Z, R- T r assume ebx:ptr EVENTMSG / G0 n. X* l$ \( u9 b f/ N4 ? .if [ebx].message == WM_LBUTTONDOWN mov eax,[ebx].hwnd ;取得当前鼠标所在控件句柄 invoke wsprintf,addr @szBuffer,addr szWnd,eax - z' p H* I* R+ S5 I4 k3 V invoke SetDlgItemText,hWndMain,EDIT_MAIN,addr @szBuffer ;显示句柄 invoke IsWindowEnabled,[ebx].hwnd ;判断控件是否无效 .if eax == FALSE & h2 c0 }' O6 \! t invoke EnableWindow,[ebx].hwnd,TRUE ;使控件可用 .endif ;.endif .endif $ {) d$ f& \2 [( f8 t8 j assume ebx:nothing .endif 8 i/ x. S2 m# H. x& u6 ? popad xor eax,eax ret _HookProc endp 1 a* c9 u: u6 G Y;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> + {" |( o& k8 a% a6 r_ProcDlgMain proc uses ebx edi esi hWnd,wMsg,wParam,lParam 9 G5 c: v2 P: f3 S; h9 @( @ mov eax,wMsg 2 w) n3 F$ m" I6 u' j, Q .if eax == WM_CLOSE .if IsStop != TRUE invoke UnhookWindowsHookEx,hHook ;卸载钩子 ! l8 E. ]- l2 f .endif invoke EndDialog,hWnd,NULL .elseif eax == WM_INITDIALOG 4 j4 F8 L5 D4 k invoke LoadIcon,hInstance,ICO_MAIN invoke SendMessage,hWnd,WM_SETICON,ICON_BIG,eax & D& u. t8 Y) p+ h4 h invoke SetWindowPos,hWnd,HWND_TOPMOST,0,0,0,0,SWP_NOMOVE or SWP_NOSIZE ;窗口最顶层 mov IsStop,TRUE push hWnd 3 Y0 g U" |" k pop hWndMain .elseif eax == WM_COMMAND mov eax,wParam y5 }' ]' h( z5 K5 ~ .if ax == IDOK .if IsStop == TRUE invoke SetDlgItemText,hWnd,IDOK,offset szStop invoke SetWindowsHookEx,WH_JOURNALRECORD,addr _HookProc,hInstance,NULL ;挂钩，日志记录钩子 .if eax mov hHook,eax 0 s5 O3 J' D, r# C& D .else ;挂钩失败 invoke MessageBox,hWnd,offset szErr,offset szCaption,MB_OK or MB_ICONWARNING 8 p" ]6 m+ a z ^* A9 P .endif / c) G2 `( H* K W+ H2 i4 ~ mov IsStop,FALSE 1 c5 F4 j+ U+ v- b- R7 ] .else invoke SetDlgItemText,hWnd,IDOK,offset szStart invoke UnhookWindowsHookEx,hHook mov IsStop,TRUE ' c' ~- U* D+ ]3 S& Q* j .endif .elseif ax == IDCANCEL 4 b4 o/ P/ D* z) } invoke SendMessage,hWnd,WM_CLOSE,NULL,NULL .elseif ax == ID_ABOUT 5 i6 M3 r; [1 e$ K invoke ShellAbout,hWnd,offset szCaption,offset szInfo,NULL ;关于对话框 n% Y4 b" f& b- g# e4 ^ T# T* U .endif .else 7 U) |2 ]$ c7 _5 N7 s3 b" i0 B mov eax,FALSE * s, P+ P8 h- i, Y+ D9 N ret * f$ i$ x4 @, g4 z0 v .endif 4 O; @% ^1 Q, _3 W+ v% t3 g* @3 V mov eax,TRUE ( z/ D/ x; [7 z4 l ret ' L' ?) Q) G* [( \_ProcDlgMain endp % R b' X5 N! d& V a9 Y6 i9 ^ ;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> 2 u9 @( [5 @0 Z3 v; o) {start: / q% [0 y) o) ] invoke GetModuleHandle,NULL mov hInstance,eax 3 J" o9 v! p% {9 I1 c5 B invoke DialogBoxParam,hInstance,DLG_MAIN,NULL,offset _ProcDlgMain,NULL 0 n" L) R5 D0 c' v( H) R invoke ExitProcess,NULL 3 C! A3 i. j7 j: U;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> end start 6 n6 p% o9 t0 n H2 U界面看下图片 ' a y% g2 Y' D) W! s& b. F: t' L. E* W 3 G1 i ^ b- u+ ^4 G8 q/ i4 s " h) I$ h1 c) m; O# ~: l

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

搞了个WH_JOURNALRECORD hook，大概是把变灰的控件Enable，有点意思
% H% V2 v, g" h不过这类界面程序实在不是汇编的强项，用了大量的invoke  ，整个程序结构看上去和c别无二致
汇编的强项不在这里，楼主如果想显耀汇编的强大，这个例子不怎么，
再来一个强一点的原创瞧瞧 ^_^
/ R/ `( k  W* A- Z$ u
9 B8 ?! [2 a( }: k/ i

1 v( t* }2 z6 H

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

firelinux

bigfoot，留个QQ怎么样。