Windows user32.dll MessageBox by Pillarofire6th Jun 2006 23:43
|
---|
Summary Create a real Windows MessageBox using an easy to use DBPro function. <code>MessageBoxNP( message$, title$, MB_OPTION )</code> Description This is a short block of code that uses a common windows (r) dll to create a Standard Message box using a DBPro function. Code ` This code was downloaded from The Game Creators ` It is reproduced here with full permission ` http://www.thegamecreators.com if mouseclick()=2 foo = MessageBoxNP( "This is the Message", "Message Title", MB_ABORTRETRYIGNORE ) endif print foo wait mouse `make a standard windows message box, NULL PARENT(NP) function MessageBoxNP( message$, title$, MB_OPTION ) #constant MB_OK 0 #constant MB_OKCANCEL 1 #constant MB_ABORTRETRYIGNORE 2 #constant MB_YESNOCANCEL 3 #constant MB_YESNO 4 #constant MB_RETRYCANCEL 5 op = 0x00000000 + MB_OPTION #constant USER32_DLL 1 load dll "user32.dll", USER32_DLL result = call dll( USER32_DLL, "MessageBoxExA", (), message$, title$, op ) delete dll USER32_DLL endfunction result |