Soyez le premier à donner votre avis sur cette source.
Snippet vu 7 110 fois - Téléchargée 28 fois
; Dans le precedent code, j'avait dit que je vous montrerais comment confirmer la sortie du programme. ; ça m'a semblé léger et donc, en plus, on va voir ici une grosse partie des evenements. ; ; prochain code, je sais pas encore koi faire...surement la creation de controls mais je promet rien... .386 ;on utilisera les instruction du 386, ce qui est bien suffisant. (on peut aussi utiliser .486 ou .586) .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 ;################################################################################## ; ; pour declarer des chaines de caratere, voici une macro utile qui bien sur n'est pas de moi... ; ;################################################################################## szText MACRO Name, Text:VARARG LOCAL lbl jmp lbl Name db Text,0 lbl: ENDM ;################################################################################## ; ; Une autre macro pour recreer le "return" du C++... ; ;################################################################################## return MACRO arg mov eax, arg ret ENDM WinMain proto :DWORD,:DWORD,:DWORD,:DWORD .data ClassName db "SimpleWinClass",0 AppName db "Votre premiere fenetre! ;)",0 ; le titre! .data? hInstance dd ? CommandLine dd ? .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 ; le handle de la fenetre... 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+1 ; ici, on px mettre la couleur...ça je maitrise pas encore...regardez dans windows.inc pour voir les couleurs possible! 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 ; Pour changer le curseur, vous pouvez mettre IDC_CROSS (la croix), IDC_SIZEALL (la croix avec des fleche qui sert a bouger, etc...) mais on verra ça plus tard! mov wc.hCursor, eax invoke RegisterClassEx, addr wc INVOKE CreateWindowEx,NULL,ADDR ClassName,ADDR AppName,\ WS_OVERLAPPEDWINDOW,CW_USEDEFAULT,\ CW_USEDEFAULT,CW_USEDEFAULT,CW_USEDEFAULT,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 szText apptitle,"-- Code N°3 --" ;################################################################################## ; ; Ici, on traite et on analyse les messages. on peut par exemple ; recuperer des evenements genre le mousedown (WM_LBUTTONDOWN), le load (WM_CREATE), ; le beforequit (WM_DESTROY), etc... (là, je compare avec VB! lol) ; ;################################################################################## .if uMsg==WM_DESTROY invoke PostQuitMessage, NULL ; recepetpion du message "qqun a cliqué sur la croix en haut" donc, on ferme l'application. .elseif uMsg==WM_CLOSE szText TheText,"Voulez vous vraiment quitter?" szText TheTitre,"..:: Confirmation ::.." invoke MessageBox,hWnd,ADDR TheText,ADDR TheTitre,MB_YESNO .if eax == IDNO ;eax contient la valeur de retours... return 0 .else invoke PostQuitMessage, NULL .endif ;.elseif uMsg==WM_SETFOCUS ;si la fenetre a le focus... ;.elseif uMsg==WM_KILLFOCUS ;si la fenetre perd le focus... .elseif uMsg==WM_KEYDOWN szText t3,"une touche a été préssé!" invoke MessageBox,hWnd,ADDR t3,ADDR apptitle,MB_OK .elseif uMsg==WM_LBUTTONDOWN szText t4,"Boutton gauche de la souris!" invoke MessageBox,hWnd,ADDR t4,ADDR apptitle,MB_OK .elseif uMsg==WM_LBUTTONDBLCLK szText t5,"Double click du boutton gauche!" invoke MessageBox,hWnd,ADDR t5,ADDR apptitle,MB_OK .elseif uMsg==WM_RBUTTONDOWN szText t6,"Boutton droit de la souris!" invoke MessageBox,hWnd,ADDR t6,ADDR apptitle,MB_OK .elseif uMsg==WM_RBUTTONDBLCLK szText t7,"Double click du boutton droit!" invoke MessageBox,hWnd,ADDR t7,ADDR apptitle,MB_OK .elseif uMsg==WM_MOUSEWHEEL szText t8,"Vous vous servez de la molette de la souris!" invoke MessageBox,hWnd,ADDR t8,ADDR apptitle,MB_OK ;.elseif uMsg==WM_PAINT ;quand la fenetre se redessine (si elle a été caché par exemple) .else ;il y en a plein...regardez dans \include\message.inc pour tous les connaitres! invoke DefWindowProc, hWnd, uMsg, wParam, lParam ret .endif xor eax,eax ; on initialise eax a 0 dans le cas d'une future utilisation. (qqun px m'expliquer pourkoi on fait pas "mov eax,0" ?? mailto:blackwizzard@wanadoo.fr) ret ; ret sert a sortir de la macro et revenir a l'instruction qui suis celle qui a lancer la macro...heu...j'arrive pas a etre clair! WndProc endp end start
Mike ; )
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.