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

游侠无极限

;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> ; EnableButton ALL For bbs.xsclub.com * ~6 B& C* h5 ~" L+ s$ w; by 游侠无极限 ;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> ; EndableButton.asm : x* q3 [ y9 \2 x; 基于对话框资源 6 o% v1 Q6 \+ K;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> .386 3 @9 V X H' [# ]4 {' u- b .model flat, stdcall / h5 W+ ^ ~3 l+ J" Q/ s [ option casemap :none ;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> ; Include 文件定义 ;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> - j( S* | N5 I- yinclude windows.inc % W" E5 c* Q( U$ \" Einclude user32.inc includelib user32.lib 6 A! e% z W9 m0 O, _* A# `6 ?& vinclude shell32.inc includelib shell32.lib ) V" W; f Z& @, tinclude kernel32.inc ! L2 I E6 d* }* ?includelib kernel32.lib # c5 K* Z) J1 c0 N;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> , C+ {- Z" G* f! O3 R; q; Equ 等值定义 7 C. U' e$ a& g, j$ P;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> 2 J4 w+ Q* b0 r3 U" z* `ICO_MAIN equ 104 ;图标 DLG_MAIN equ 101 ;对话框 EDIT_MAIN equ 1002 ;编辑框 ID_ABOUT equ 1000 ;关于按钮 ;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> 2 w* G1 B) U+ c; 数据段 ;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> W l7 e g, Z/ R .data? hInstance dd ? 4 R( N' |& b1 O2 b# K3 j$ e* \hHook dd ? hWndMain dd ? IsStop dd ? 8 P# D4 P& T& c) r, T/ b( J .const 1 C; R1 C) i' e3 i9 A/ ?( NszStart db '启动',0 szStop db '停止',0 . F, p3 T7 H6 y5 _szCaption db 'EnableButton',0 9 z5 t( S( J/ }1 W4 ^/ E& ZszInfo db '版权没有 03.8.20 游侠无极限制作',0 5 k1 z0 T& b$ v! b6 CszErr db '安装钩子失败，原因不明',0 9 r/ R3 W% B2 E- EszWnd db '%lxH',0 ;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> ; 代码段 ;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> s" p+ X$ P6 r' B7 Z7 C .code ;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> ;钩子回调函数 ' U( A& p8 N/ Y0 g' r& Z; E& u0 s2 H;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> _HookProc proc _dwCode,_wParam,_lParam 4 {7 ?5 A) F, B- ^8 u6 ?+ N1 t local @szBuffer[100]:byte * k3 I% S }) L% P invoke CallNextHookEx,hHook,_dwCode,_wParam,_lParam ;钩子链传递 ( r) M: c9 ^0 D6 ~: J" Q pushad .if _dwCode == HC_ACTION ;Windows要移除一条消息时 mov ebx,_lParam " U. q2 c5 W5 y2 F- B; m assume ebx:ptr EVENTMSG e" o& O" c3 h- ?: W. Q* V. N .if [ebx].message == WM_LBUTTONDOWN mov eax,[ebx].hwnd ;取得当前鼠标所在控件句柄 2 U) B( @/ L* o+ P9 z$ X+ P$ c invoke wsprintf,addr @szBuffer,addr szWnd,eax invoke SetDlgItemText,hWndMain,EDIT_MAIN,addr @szBuffer ;显示句柄 invoke IsWindowEnabled,[ebx].hwnd ;判断控件是否无效 .if eax == FALSE 8 R+ H/ i* T/ f$ O invoke EnableWindow,[ebx].hwnd,TRUE ;使控件可用 .endif ;.endif .endif assume ebx:nothing .endif 4 Z, L) H& I( |& [2 r, x( s; y popad xor eax,eax ret _HookProc endp ;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> 1 r+ I: |) P6 m_ProcDlgMain proc uses ebx edi esi hWnd,wMsg,wParam,lParam 9 A" X6 V3 t( P" S Q" e. S0 ] mov eax,wMsg , E' x. b1 O9 [% f .if eax == WM_CLOSE .if IsStop != TRUE invoke UnhookWindowsHookEx,hHook ;卸载钩子 ; Y/ T( q ~* E( ?& m$ F .endif ( O) q* O, ~2 V$ E' |6 w invoke EndDialog,hWnd,NULL ) {# J4 s" c( T- H1 h9 \ .elseif eax == WM_INITDIALOG ) y( i4 N, T' A 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 ;窗口最顶层 + u/ }- c g0 i. A' ` mov IsStop,TRUE $ N" ^6 d" E) Z7 T push hWnd + N% _' q' P0 d+ `& B# v' d pop hWndMain 6 P" r1 }0 M$ E9 c" U .elseif eax == WM_COMMAND mov eax,wParam ( l9 Y2 ^. m. X( i" O$ v9 H .if ax == IDOK .if IsStop == TRUE invoke SetDlgItemText,hWnd,IDOK,offset szStop ! v- M7 K1 c/ a: h/ _ invoke SetWindowsHookEx,WH_JOURNALRECORD,addr _HookProc,hInstance,NULL ;挂钩，日志记录钩子 ' L( T( r' R2 q0 i% X" U .if eax mov hHook,eax 9 \3 ^0 v+ N* G6 u& | .else ;挂钩失败 4 c0 D8 V* x% o6 ?: u# \ P- Y invoke MessageBox,hWnd,offset szErr,offset szCaption,MB_OK or MB_ICONWARNING 4 ]7 Y# q3 m9 \4 d1 ` .endif mov IsStop,FALSE .else 2 ^8 ?' e* q5 A7 F& g$ v+ B invoke SetDlgItemText,hWnd,IDOK,offset szStart ) l. j8 [6 q/ `. [7 J invoke UnhookWindowsHookEx,hHook mov IsStop,TRUE .endif . \$ X, l5 m7 |5 F. d/ \/ J1 N .elseif ax == IDCANCEL ; g/ y6 j x0 k2 { invoke SendMessage,hWnd,WM_CLOSE,NULL,NULL .elseif ax == ID_ABOUT 2 V* Y! l0 ^# b& F" W2 f invoke ShellAbout,hWnd,offset szCaption,offset szInfo,NULL ;关于对话框 .endif .else mov eax,FALSE ret .endif mov eax,TRUE 7 k3 C3 ~( J) }# j ret / r, L/ P1 J3 t2 {9 M( }2 p_ProcDlgMain endp . w- h, L7 n" k7 R+ o# Y ;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> % ~: G e: N0 ~$ q* N# A4 O) mstart: invoke GetModuleHandle,NULL mov hInstance,eax invoke DialogBoxParam,hInstance,DLG_MAIN,NULL,offset _ProcDlgMain,NULL ; w' r* Z k0 `9 y( ~) i" L& } invoke ExitProcess,NULL * g& U0 Q8 V! N9 `/ U; C6 z;>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>>> end start 2 r4 x% ?3 ^$ Z( d' J" \, \ 界面看下图片 ( @" i2 v, Y$ ?: r 2 A8 J% }3 B3 v6 S x - V' n( C: U2 A. I9 l " l9 c. U$ E& X* |9 N) z/ {( F9 p " y/ X% H f4 {( [

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

z2 X2 m% c& B2 K% v, @5 N9 T6 x- k+ i

firelinux

bigfoot，留个QQ怎么样。

搞了个WH_JOURNALRECORD hook，大概是把变灰的控件Enable，有点意思
5 p% C1 U+ |% g! d( z* d不过这类界面程序实在不是汇编的强项，用了大量的invoke  ，整个程序结构看上去和c别无二致
汇编的强项不在这里，楼主如果想显耀汇编的强大，这个例子不怎么，
/ c. V  B0 p% \2 s. I3 j& i6 _& J再来一个强一点的原创瞧瞧 ^_^



  V) X, L% ~5 `7 K8 Y  Y

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

+ n; U/ G6 ?* U& M3 X