Accueil > > > [CODE 02] DEPLACER UNE FENETRE SANS LA BORDURE [MASM32]
[CODE 02] DEPLACER UNE FENETRE SANS LA BORDURE [MASM32]
Information sur la source
Description
Voici le 2eme code de la serie. C un code assez simple, il n'y a pas grand chose de nouveau par rapport au precedent code.
Source
- ; dans le precedent code, je vous avais dit que je vous apprendrais comment deplacer la fenetre sans la bordure!
- ; hé bien voila! C fait!
- ; j'en ai profité pour changer le curseur.
- ; pas d'autres nouveautés, pour bien vous laisser comprendre...
- ; Prochain code :: Conformation de sortie de programme.
- ; ce ne sera pas encore tres compliqué! n'oubliez pas que au moment ou j'ecrit ces ligne, je ne fait de l'asm que depuis 5 jours et qques heures!
- ; (bon, d'accord, j'y passe mes nuits...)
-
- .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
-
- WinMain proto :DWORD,:DWORD,:DWORD,:DWORD
-
- .data
- ClassName db "SimpleWinClass",0
- AppName db "Essayez de bouger la fenetre sans la bordure!",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_BTNFACE ;Couleur de fond de la fenetre...
- 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_SIZEALL ;là, on va mettre le curseur de positionnement...
- 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
-
- ;##################################################################################
- ;
- ; 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 ;receptpion du message "qqun a cliqué sur la croix en haut" donc, on ferme l'application.
-
- .ELSEIF uMsg == WM_LBUTTONDOWN ;Si mousedown, alors on deplace la fenetre sans la bordure! Magik! et vous voyez? plus simple qu'en VB!
- invoke SendMessage,hWnd,WM_NCLBUTTONDOWN,HTCAPTION,lParam
-
- .else
- 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
; dans le precedent code, je vous avais dit que je vous apprendrais comment deplacer la fenetre sans la bordure!
; hé bien voila! C fait!
; j'en ai profité pour changer le curseur.
; pas d'autres nouveautés, pour bien vous laisser comprendre...
; Prochain code :: Conformation de sortie de programme.
; ce ne sera pas encore tres compliqué! n'oubliez pas que au moment ou j'ecrit ces ligne, je ne fait de l'asm que depuis 5 jours et qques heures!
; (bon, d'accord, j'y passe mes nuits...)
.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
WinMain proto :DWORD,:DWORD,:DWORD,:DWORD
.data
ClassName db "SimpleWinClass",0
AppName db "Essayez de bouger la fenetre sans la bordure!",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_BTNFACE ;Couleur de fond de la fenetre...
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_SIZEALL ;là, on va mettre le curseur de positionnement...
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
;##################################################################################
;
; 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 ;receptpion du message "qqun a cliqué sur la croix en haut" donc, on ferme l'application.
.ELSEIF uMsg == WM_LBUTTONDOWN ;Si mousedown, alors on deplace la fenetre sans la bordure! Magik! et vous voyez? plus simple qu'en VB!
invoke SendMessage,hWnd,WM_NCLBUTTONDOWN,HTCAPTION,lParam
.else
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
Sources du même auteur
Sources de la même categorie
Commentaires et avis
|
Derniers Blogs
COMMENT MAPPER UNE VUE SQL SUR UNE COLLECTION DE COMPLEX TYPE?COMMENT MAPPER UNE VUE SQL SUR UNE COLLECTION DE COMPLEX TYPE? par Matthieu MEZIL
Avec EF, les vues doivent être mappées sur des entity types. Le problème c'est que les entity types doivent avoir une clé. Avec EF, nous avons les complex type qui n'ont pas de clé mais les vues ne peuvent pas être mappées dessus. Avec EF4, il est possibl...
Cliquez pour lire la suite de l'article par Matthieu MEZIL [WF4] UN BINDING ACTIVITY/ACTIVITYDESIGNER QUI PASSE MAL?[WF4] UN BINDING ACTIVITY/ACTIVITYDESIGNER QUI PASSE MAL? par JeremyJeanson
Certain d'entre vous on peut être vécu cette situation embarrassante après quelques temps passer avec WF4 : Au début avec mon " ActivityDesigner" , tout allait bien. Et puis un jour j'ai au des problèmes de " Binding" . Alors nous sommes allé sur le site ...
Cliquez pour lire la suite de l'article par JeremyJeanson MYTIC - SHAREPOINT 2010 : DéJà UN MYTHE MICROSOFT ?MYTIC - SHAREPOINT 2010 : DéJà UN MYTHE MICROSOFT ? par junarnoalg
La prochaine session de MyTIC aura lieu à Namur, le 23 mars prochain. Pendant presque une heure, nous parlerons de SharePoint 2010. Voici un aperçu du programme.
Accueil : 17h30 Début de la session : 18h00 - Les nouvelles int...
Cliquez pour lire la suite de l'article par junarnoalg
Forum
RE : ASSEMBLEURRE : ASSEMBLEUR par solleil
Cliquez pour lire la suite par solleil RE : ASSEMBLEURRE : ASSEMBLEUR par ghuysmans99
Cliquez pour lire la suite par ghuysmans99
Logiciels
Academy System (10.9.4.0)ACADEMY SYSTEM (10.9.4.0)Logiciel de gestion des établissements.
- élèves/étudiants (inscription, dossier, absence...)
-... Cliquez pour télécharger Academy System Xilisoft Convertisseur Vidéo Ultimate (5.1.39.0305)XILISOFT CONVERTISSEUR VIDéO ULTIMATE (5.1.39.0305)Xilisoft Convertisseur Vidéo Ultimate est un outil puissant de conversion vidéo, facile à utilise... Cliquez pour télécharger Xilisoft Convertisseur Vidéo Ultimate Xilisoft DVD Ripper Ultimate (5.0.64.0304)XILISOFT DVD RIPPER ULTIMATE (5.0.64.0304)Xilisoft DVD Ripper Ultimate est un logiciel excellent pour copier et convertir DVD vers presque ... Cliquez pour télécharger Xilisoft DVD Ripper Ultimate Rigs of Rods (63.3)RIGS OF RODS (63.3)c'est un jeu de multi-simulation camions,autobus voitures, avions, bateaux, hélicoptère avec défo... Cliquez pour télécharger Rigs of Rods
|