• Гідрологія і Гідрометрія
• Господарське право
• Економіка будівництва
• Економіка природокористування
• Економічна теорія
• Земельне право
• Історія України
• Кримінально виконавче право
• Медична радіологія
• Методи аналізу
• Міжнародне приватне право
• Міжнародний маркетинг
• Основи екології
• Предмет Політологія
• Соціальне страхування
• Технічні засоби організації дорожнього руху
• Товарознавство продовольчих товарів

MENUP MENU

END START

WNDPROC ENDP

RET 16

POP EBP

POP EBX

POP ESI

POP EDI

MOV EAX, 0

PUSH 0

PUSH MEMDC

PUSH HBRUSH

PUSH HPEN

JMP FINISH

JMP FINISH

MOV EAX, 0

PUSH HDC

MOV HBMP, EAX

PUSH 0

PUSH 0

PUSH 2

PUSH 3

PUSH 0

PUSH HDC

PUSH XM

PUSH YM

MOV MEMDC,EAX

PUSH EAX

MOV HDC,EAX

MOV YM,EAX

MOV XM,EAX

JMP FINISH

JMP FINISH

MOV EAX, 0

PUSH OFFSET PNT

PUSH OFFSET PNT

JMP WMDESTROY

JMP DEFWNDPROC

JE RBUTTON

JE LBUTTON

JE WMPAINT

JE WMCREATE

JE WMCOMMAND

JE WMDESTROY

CMP DWORD PTR [EBP+0CH], WM_COMMAND

CMP DWORD PTR [EBP+0CH], WM_CREATE

CMP DWORD PTR [EBP+0CH], WM_PAINT

CMP DWORD PTR [EBP+0CH],WM_LBUTTONDOWN

CMP DWORD PTR [EBP+0CH],WM_RBUTTONDOWN

;натиснення правої кнопки приводить до закриття вікна додатку

RBUTTON:

;натиснення лівої кнопки приводить до появи вікна повідомлення

WMPAINT:

PUSH DWORD PTR [EBP+08H]

CALL BeginPaint@8

MOV HDC, EAX;зберегти контекст (дескриптор) скопіювати віртуальне вікно на реальне

PUSH 0CC0020h ;SRCCOPY=скопіювати зображення як воно є

PUSH 0 ;y-джерела

PUSH 0 ;x-джерела

PUSH MEMDC ;контекст джерела

PUSH YM ;висота - куди

PUSH XM ;ширина - куди

PUSH 0 ;y-куди

PUSH 0 ;x-куди

PUSH HDC ;контекст - куди

CALL BitBlt@36

;закрити контекст вікна

PUSH DWORD PTR [EBP+08H]

CALL EndPaint@8

LBUTTON:

WMCREATE:

;розміри екрану

PUSH 0 ;X

CALL GetSystemMetrics@4

PUSH 1 ;Y

CALL GetSystemMetrics@4

;відкрити контекст вікна

PUSH DWORD PTR [EBP+08H]

CALL GetDC@4

;створити сумісний з даним вікном контекст

CALL CreateCompatibleDC@4

;створити в пам’яті растрове зображення сумісне з HDC

CALL CreateCompatibleBitmap@12

PUSH [EBP+08H]

CALL BmpButton@24

;знищити контекст

PUSH DWORD PTR [EBP+08H]

CALL ReleaseDC@8

WMCOMMAND:

; MOV EAX, [EBP+14H]

; CMP EAX, HBMP

; JE WMDESTROY

DEFWNDPROC:

PUSH DWORD PTR [EBP+14H]

PUSH DWORD PTR [EBP+10H]

PUSH DWORD PTR [EBP+0CH]

PUSH DWORD PTR [EBP+08H]

CALL DefWindowProcA@16

WMDESTROY:

;видалити перо

CALL DeleteDC@4

;видалити пензель

CALL DeleteDC@4

;видалити віртуальне вікно

CALL DeleteDC@4

CALL PostQuitMessage@4 ;повідомлення WM_QUIT

FINISH:

_TEXT ENDS

#define IDI_ICON1 1

IDI_ICON1 ICON "calculator.ico"

#define IDI_BIT1 2

IDI_BIT1 BITMAP "picture1.bmp"

#define IDI_BIT2 3

IDI_BIT2 BITMAP "picture2.bmp"

#define WS_SYSMENU 0x00080000L

#define WS_MINIMIZEBOX 0x00020000L

#define WS_MAXIMIZEBOX 0x00010000L

#define WS_POPUP 0x80000000L

#define WS_CAPTION 0x00C00000L

{

POPUP "File"

{

MENUITEM "&Open", 1

MENUITEM "R&ename", 2

MENUITEM "&Save", 3

}

POPUP "String"

{

MENUITEM "Firs&t - Help", 4,

POPUP "Seco&nd",

{

MENUITEM "Next punk&t", 5,

}

POPUP "Thir&d", Grayed

{

MENUITEM "Next punk&t", 6, Inactive

}

}

MENUITEM "Ex&it", 9

}

#define STR1 11

#define STR2 12

#define IDI_ICON1 100

IDI_ICON1 ICON "calculator.ico"

Читайте також:

1. MENUP MENU

Переглядів: 380