MB_YESNO  ( -- 4 )

publication: 14 novembre 2024 / mis à jour 16 novembre 2024

Read this page in english

Constant. Value 4. Utilisé par MessageBoxA.

La boîte de message contient deux boutons pousseurs : Oui et Non.

Exemple:

z" Will you continue?" constant lpText 
z" make a choice"      constant lpCaption 
 
: MSGbox  ( -- ) 
    NULL lpText lpCaption MB_YESNO MessageBoxA  
    ?dup if 
        cr ." You have pressed: "  
        case 
            6 of ." Yes"      endof 
            7 of ." No"       endof 
        endcase 
    then 
  ; 

Legal: site web personnel sans commerce / personal site without seling