dialog.asm

;rc文件如下：

#include   <resource.h>

7 ICON   "me.ico"
9 BITMAP   "me.bmp"

1 DIALOG MOVEABLE PURE LOADONCALL DISCARDABLE 0,0,99,99
STYLE DS_FIXEDSYS |DS_SETFONT |WS_POPUP |WS_VISIBLE |WS_SYSMENU |WS_THICKFRAME |WS_MAXIMIZEBOX |WS_MINIMIZEBOX |WS_CAPTION
CAPTION "made by correy"
FONT 9, "宋体"
{
ICON 7, -1, 0, 0, 32, 32
LTEXT "made by correy", -1, 32, 0, 99, 18
DEFPUSHBUTTON "exit", IDOK, 0, 32,27,18
// CONTROL "", -1, "Static", SS_ETCHEDHORZ | WS_CHILD | WS_VISIBLE, 199, 199, 199, 199
CONTROL 9,-1,"STATIC",SS_BITMAP | WS_CHILD |WS_VISIBLE ,0,50,268,342
CONTROL "made by correy.",IDC_EDIT1,"EDIT",ES_LEFT |WS_CHILD |WS_BORDER |WS_TABSTOP |WS_VISIBLE ,99,0,99,9
//CONTROL "",2,"RichEdit",WS_CHILD |WS_BORDER |WS_TABSTOP |WS_VISIBLE ,85,20,100,65

}

1 VERSIONINFO
FILEVERSION 9,9,9,9
PRODUCTVERSION 9,9,9,9
FILEOS 0
FILETYPE 0
FILESUBTYPE 0
{
BLOCK "StringFileInfo"
{
BLOCK "040904E4"
   {
VALUE "Comments", "xxx"  
VALUE "CompanyName", "correy "
VALUE "FileVersion", "made by correy "
VALUE "FileDescription", "made by correy"
VALUE "InternalName", "made by correy"
VALUE "LegalCopyright", "made by correy"
VALUE "LegalTrademarks", "made by correy"
VALUE "OriginalFilename", "made by correy"
VALUE "ProductName", "made by correy"
VALUE "ProductVersion", "made by correy"
VALUE "PrivateBuild", "made by correy"
VALUE "SpecialBuild", "made by correy"
   }
}
BLOCK "VarFileInfo"
{
VALUE "Translation", 2052, 1200
}
}

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

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

.data?
hInstance dd   ?

.code
liuchunli proc uses ebx edi esi hWnd,wMsg,wParam,lParam
   mov eax,wMsg
   .if eax == WM_CLOSE
    invoke EndDialog,hWnd,NULL
   .elseif eax == WM_INITDIALOG
    invoke LoadIcon,hInstance,7
    invoke SendMessage,hWnd,WM_SETICON,ICON_BIG,eax
   .elseif eax == WM_COMMAND
    mov eax,wParam
    .if ax == IDOK
     invoke EndDialog,hWnd,NULL
    .endif
   .else
    mov eax,FALSE
    ret
   .endif
   mov eax,TRUE
   ret
liuchunli endp

start:
   invoke GetModuleHandle,NULL
   mov hInstance,eax
   invoke DialogBoxParam,hInstance,1,NULL,offset liuchunli,NULL
   invoke ExitProcess,NULL
   end start