Intel® Fortran Compiler Classic and Intel® Fortran Compiler Developer Guide and Reference

ID 767251
Date 3/22/2024
Public
Document Table of Contents

MESSAGEBOXQQ

QuickWin Function: Displays a message box in a QuickWin window. This routine is only available for Windows.

Module

USE IFQWIN

result = MESSAGEBOXQQ (msg,caption,mtype)

msg

(Input) Character*(*). Null-terminated C string. Message the box displays.

caption

(Input) Character*(*). Null-terminated C string. Caption that appears in the title bar.

mtype

(Input) INTEGER(4). Symbolic constant that determines the objects (buttons and icons) and properties of the message box. You can combine several constants (defined in IFQWIN.F90) using an inclusive OR (IOR or OR). The symbolic constants and their associated objects or properties are as follows:

  • MB$ABORTRETRYIGNORE - The Abort, Retry, and Ignore buttons.

  • MB$DEFBUTTON1 - The first button is the default.

  • MB$DEFBUTTON2 - The second button is the default.

  • MB$DEFBUTTON3 - The third button is the default.

  • MB$ICONASTERISK, MB$ICONINFORMATION - Lowercase i in blue circle icon.

  • MB$ICONEXCLAMATION - The exclamation-mark icon.

  • MB$ICONHAND, MB$ICONSTOP - The stop-sign icon.

  • MB$ICONQUESTION - The question-mark icon.

  • MB$OK - The OK button.

  • MB$OKCANCEL - The OK and Cancel buttons.

  • MB$RETRYCANCEL - The Retry and Cancel buttons.

  • MB$SYSTEMMODAL - Box is system-modal: all applications are suspended until the user responds.

  • MB$YESNO - The Yes and No buttons.

  • MB$YESNOCANCEL - The Yes, No, and Cancel buttons.

Results

The result type is INTEGER(4). The result is zero if memory is not sufficient for displaying the message box. Otherwise, the result is one of the following values, indicating the user's response to the message box:

  • MB$IDABORT - The Abort button was pressed.

  • MB$IDCANCEL - The Cancel button was pressed.

  • MB$IDIGNORE - The Ignore button was pressed.

  • MB$IDNO - The No button was pressed.

  • MB$IDOK - The OK button was pressed.

  • MB$IDRETRY - The Retry button was pressed.

  • MB$IDYES - The Yes button was pressed.

Example

 ! Build as QuickWin app
 USE IFQWIN
 message = MESSAGEBOXQQ('Do you want to continue?'C,    &
           'Matrix'C,   &
           MB$ICONQUESTION.OR.MB$YESNO.OR.MB$DEFBUTTON1)
 END