Fini les étoiles

Commenter

Contenu du snippet

;j'ai vu différent prog fait pour enlever les etoiles(*)pour les mot de passe,
;et il y en a plein qui se serve du hook pour cela... et le listing est lourd
;a comprendre!Ma procédure est toute simple: sachant qu'un handle est stockée
;sur un WORD ,je scrute tout les handles jusqu'à FFFFh et j'envoie un message
;EM_SETPASSWORDCHAR et les étoiles y'en a plus!!!(essayez sur vos codes
;internet!).donc ouvrez la fenetre ou se trouvent les etoiles(*)et cliquez sur
; 'Découvrir!' Si jamais ça marche pas, passez la fenetre de mon application
;par dessus l'edit a découvrir

Source / Exemple : 


.386
.model flat,stdcall
option casemap:none
include \masm32\include\windows.inc
include \masm32\include\user32.inc
include \masm32\include\kernel32.inc
includelib \masm32\lib\user32.lib
includelib \masm32\lib\kernel32.lib

WinMain proto :DWORD,:DWORD,:DWORD,:DWORD

.data
ClassName db "SimpleWinClass",0
AppName  db "Reveler",0
ted db "Annuler",0
ButtonClassName db "button",0 
ButtonText1 db "Découvrir!",0

ButtonID1 equ 2

hInstance HINSTANCE ?
CommandLine LPSTR ?
hwndButton1 HWND ? 
.code
start:
	invoke GetModuleHandle, NULL
	mov    hInstance,eax
	invoke GetCommandLine
	mov    CommandLine,eax
	invoke WinMain, hInstance,NULL,CommandLine, SW_SHOWDEFAULT
	invoke ExitProcess,eax

WinMain proc hInst:HINSTANCE,hPrevInst:HINSTANCE,CmdLine:LPSTR,CmdShow:DWORD
	LOCAL wc:WNDCLASSEX
	LOCAL msg:MSG
	LOCAL hwnd:HWND
	mov   wc.cbSize,SIZEOF WNDCLASSEX
	mov   wc.style, CS_HREDRAW or CS_VREDRAW
	mov   wc.lpfnWndProc, OFFSET WndProc
	mov   wc.cbClsExtra,NULL
	mov   wc.cbWndExtra,NULL
	push  hInstance
	pop   wc.hInstance
	mov   wc.hbrBackground,COLOR_WINDOW
	mov   wc.lpszMenuName,NULL
	mov   wc.lpszClassName,OFFSET ClassName
	invoke LoadIcon,NULL,IDI_APPLICATION
	mov   wc.hIcon,eax
	mov   wc.hIconSm,eax
	invoke LoadCursor,NULL,IDC_ARROW
	mov   wc.hCursor,eax
	invoke RegisterClassEx, addr wc
	INVOKE CreateWindowEx,NULL,ADDR ClassName,ADDR AppName,\
           WS_OVERLAPPEDWINDOW,CW_USEDEFAULT,\
           CW_USEDEFAULT,300,100,NULL,NULL,\
           hInst,NULL
	mov   hwnd,eax
	invoke ShowWindow, hwnd,SW_SHOWNORMAL
	invoke UpdateWindow, hwnd
	.WHILE TRUE
		invoke GetMessage, ADDR msg,NULL,0,0
		.BREAK .IF (!eax)
		invoke TranslateMessage, ADDR msg
		invoke DispatchMessage, ADDR msg
	.ENDW
	mov     eax,msg.wParam
	ret
WinMain endp

WndProc proc hWnd:HWND, uMsg:UINT, wParam:WPARAM, lParam:LPARAM
	.IF uMsg==WM_DESTROY
		invoke PostQuitMessage,NULL
		.elseif uMsg==WM_CREATE
; -->  CREER BUTTON
        invoke  CreateWindowEx,NULL, ADDR ButtonClassName,ADDR ButtonText1,\
                 WS_CHILD or WS_VISIBLE or BS_PUSHBUTTON,\
                  75,25,100,20,hWnd,ButtonID1,hInstance,NULL
        mov    hwndButton1,eax      
            
                  
        .elseif uMsg==WM_COMMAND
        mov eax,wParam
       .if ax==2
       call Decouvre
       .endif

	.ELSE
		invoke DefWindowProc,hWnd,uMsg,wParam,lParam		
		ret
	.ENDIF
	xor eax,eax
	ret
WndProc endp

Decouvre proc
 Xor esi,esi
Boucle:
        cmp esi,0FFFFh
        je Fin                
        invoke SendMessage,esi,EM_SETPASSWORDCHAR,0,0
        ;invoke SetWindowText,esi,ADDR ted;une variante pour la tester enlève le point-virgule
        inc si
        jmp Boucle
Fin:	
        ret
                       
Decouvre endp

end start

A voir également

S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Du même auteur (SimonKari)