За последние 60 дней ни разу не выходила
Сайт рассылки: http://rusfaq.ru Открыта: 02-07-2003
Выпуск № 179от 20.12.2005, 12:42
Приложение:.386 .model flat,stdcall option casemap:none include masm32includewindows.inc include masm32includeuser32.inc include masm32includekernel32.inc includelib masm32libuser32.lib includelib masm32libkernel32.lib DlgProc PROTO :DWORD,:DWORD,:DWORD,:DWORD .data DlgName db "Di",0 IDR_M db "IDR_MENU" ID_ICON db "ICU" .data? hInstance HINSTANCE ? .const IDC_BTN1 equ 1001 IDC_BTN2 equ 1002 IDC_EDT1 equ 1 IDM_a equ 10002 IDM_b equ 10003 .code start: invoke GetModuleHandle, NULL mov hInstance,eax invoke DialogBoxParam, hInstance,ADDR DlgName,NULL,ADDR DlgProc,0 invoke ExitProcess,eax DlgProc proc uses esi edi hWnd:HWND, uMsg:UINT, wParam:WPARAM, lParam:LPARAM, .if uMsg==WM_INITDIALOG invoke LoadMenu,hInstance,ADDR IDR_M invoke LoadIcon,hInstance,ADDR ID_ICON .elseif uMsg==WM_CLOSE invoke EndDialog,hWnd,NULL .elseif uMsg==WM_COMMAND mov eax,wParam mov edx,eax shr edx,16 .if dx==BN_CLICKED .if eax==IDC_BTN2 invoke SendMessage,hWnd,WM_CLOSE,NULL,NULL .endif .endif .endif xor eax,eax ret DlgProc Endp end start #define IDC_BTN1 1001 #define IDC_BTN2 1002 #define IDC_EDT1 1 #define IDM_a 10003 #define IDM_b 10002 Di DIALOGEX 26,5,201,72 CAPTION "Óðà,ïîëó÷èëîñü!" FONT 8,"MS Sans Serif" STYLE 0x10CF0000 EXSTYLE 0x00000000 BEGIN CONTROL "Open",IDC_BTN1,"Button",0x50010000,136,7,54,17,0x00000000 CONTROL "Exit",IDC_BTN2,"Button",0x50010000,136,27,54,17,0x00000000 CONTROL "",IDC_EDT1,"Edit",0x50010000,4,15,124,49,0x00000200 END IDR_M MENUEX BEGIN MENUITEM "xxx",IDM_a MENUITEM "zzz",IDM_b END ICU ICON "Mine3.ico"
Приложение:.386 .model flat,stdcall option casemap:none include windows.inc include user32.inc include kernel32.inc includelib user32.lib includelib kernel32.lib DlgProc PROTO :DWORD,:DWORD,:DWORD,:DWORD .data IDR_M EQU 10000; Dlg EQU 1000; ID_ICON EQU 2000; .data? hInstance HINSTANCE ? .const IDC_BTN1 equ 1001 IDC_BTN2 equ 1002 IDM_a equ 10002 IDM_b equ 10003 .code start: invoke GetModuleHandle, NULL mov hInstance,eax invoke DialogBoxParam, hInstance,Dlg,NULL,ADDR DlgProc,0 invoke ExitProcess,eax DlgProc proc uses esi edi hWnd:HWND, uMsg:UINT, wParam:WPARAM, lParam:LPARAM, .if uMsg==WM_INITDIALOG invoke LoadMenu,hInstance,IDR_M invoke SetMenu,hWnd,eax; invoke LoadIcon,hInstance,ID_ICON; invoke SetClassLong,hWnd,GCL_HICON,eax; .elseif uMsg==WM_CLOSE invoke EndDialog,hWnd,NULL .elseif uMsg==WM_COMMAND mov eax,wParam mov edx,eax shr edx,16 .if dx==BN_CLICKED .if eax==IDC_BTN2 invoke SendMessage,hWnd,WM_CLOSE,NULL,NULL .endif .endif .endif xor eax,eax ret DlgProc Endp end start File diDlg.Rc #define Dlg 1000 #define IDC_BTN1 1001 #define IDC_BTN2 1002 Dlg DIALOGEX 6,6,257,183 CAPTION "Window Name" FONT 8,"MS Sans Serif",400,0 STYLE 0x10CF0000 EXSTYLE 0x00000000 BEGIN CONTROL "Open",IDC_BTN1,"Button",0x50010000,8,11,104,30,0x00000000 CONTROL "Exit",IDC_BTN2,"Button",0x50010000,6,59,106,35,0x00000000 END File rfMnu.Rc #define IDR_M 10000 #define IDM_a 10001 #define IDM_1 10003 #define IDM_b 10002 #define IDM_2 10004 IDR_M MENUEX BEGIN POPUP "xxx",IDM_a BEGIN MENUITEM "1",IDM_1 END POPUP "zzz",IDM_b BEGIN MENUITEM "2",IDM_2 END END File rf.Rc #include "Res/diDlg.rc" #include "Res/rfMnu.rc" ;#include "Res/85.ico" 2000 ICON "Res/85.ico"
Приложение (если необходимо): * Код программы, выдержки из закона и т.п. дополнение к вопросу. Эта информация будет отображена в аналогичном окне как есть.
Обратите внимание! Вопрос будет отправлен всем экспертам данной рассылки! Для того, чтобы отправить вопрос выбранным экспертам этой рассылки или экспертам другой рассылки портала RusFAQ.ru, зайдите непосредственно на RusFAQ.ru.
Форма НЕ работает в почтовых программах The BAT! и MS Outlook (кроме версии 2003+)! Чтобы отправить вопрос, откройте это письмо в браузере или зайдите на сайт RusFAQ.ru.
{#template MAIN} {#include js_tmpl_auth_reg_tab} {#if $P.login_register_tab == 1} Войти на сайт {* {#include js_tmpl_auth_reg_button} *} {#include js_tmpl_auth_reg_action} {#include js_tmpl_auth_reg_descr} Если вы еще не с нами, то начните с регистрации Вход для авторов {#/if} {#if $P.login_register_tab == 2} Регистрация {* {#include js_tmpl_soc_auth_reg_descr} *} {#include js_tmpl_auth_reg_soc} {#include js_tmpl_auth_reg_agree} {* #include js_tmpl_auth_reg_descr *} {#include js_tmpl_auth_reg_action} {* {#include js_tmpl_auth_reg_button} *} {#include js_tmpl_auth_reg_descr} {#include js_tmpl_soc_auth_reg_descr} {#/if} {* *} {#/template MAIN} {#template js_tmpl_auth_reg_tab} Вход на сайт Регистрация {#/template js_tmpl_auth_reg_tab} {#template js_tmpl_auth_reg_action} {#if $P.login_register_tab == 1} {#include js_tmpl_auth_reg_soc} {#/if} {#if $P.login_register_tab == 1} E-mail или код подписчика Пароль Русская раскладка клавиатуры! У вас включен Caps Lock! У вас включен Caps Lock и русская раскладка клавиатуры! Чужой компьютер Забыли пароль? {#/if} {#if $P.login_register_tab == 2} E-mail Я ознакомился и согласен с условиями сервиса Subscribe.ru Нажимая на кнопку "Готово!", я даю согласие на обработку персональных данных {* Я хочу получать новости о скидках на одежду *} Готово! {#/if} {#/template js_tmpl_auth_reg_action} {#template js_tmpl_auth_reg_agree} Я ознакомился и согласен с условиями сервиса Subscribe.ru {#/template js_tmpl_auth_reg_agree} {#template js_tmpl_auth_reg_button} {#if $P.login_register_tab == 1} Email OpenID Вконтакте Mail.Ru {#/if} {#if $P.login_register_tab == 2} Email OpenID Вконтакте Mail.Ru {#/if} {#/template js_tmpl_auth_reg_button} {#template js_tmpl_auth_reg_descr} {#if $P.login_register_tab == 1} Для оформления подписки на выбранную рассылку, работы с интересующей вас группой или доступа в нужный вам раздел, просим авторизоваться на Subscribe.ru {#/if} {#if $P.login_register_tab == 2} Для регистрации укажите ваш e-mail адрес. Адрес должен быть действующим, на него сразу после регистрации будет отправлено письмо с инструкциями и кодом подтверждения. {#/if} {#/template js_tmpl_auth_reg_descr} {#template js_tmpl_soc_auth_reg_descr} Или зарегистрируйтесь через социальную сеть. {#/template js_tmpl_soc_auth_reg_descr} {#template js_tmpl_auth_reg_soc} {#if $P.login_register_tab == 1} {#/if} {#if $P.login_register_tab == 2} {#/if} {#/template js_tmpl_auth_reg_soc}
{#include js_tmpl_auth_reg_descr}
{#template MAIN} {#include js_tmpl_auth_reg_tab} {#include js_tmpl_auth_reg_descr} {#include js_tmpl_auth_reg_action} {#/template MAIN} {#template js_tmpl_auth_reg_tab} Регистрация {#/template js_tmpl_auth_reg_tab} {#template js_tmpl_auth_reg_descr} Пожалуйста, подтвердите ваш адрес.Вам отправлено письмо для подтверждения вашего адреса {$P.register_confirm_mail}.Для подтверждения адреса перейдите по ссылке из этого письма. {#/template js_tmpl_auth_reg_descr} {#template js_tmpl_auth_reg_action} Или введите код из письма: Не пришло письмо? Пожалуйста, проверьте папку Спам (папку для нежелательной почты). Вышлите мне письмо еще раз! Готово {#/template js_tmpl_auth_reg_action}