# SETMESSAGEQQ (W*S)

QuickWin Subroutine: Changes QuickWin status messages, state messages, and dialog box messages.

## Module

USE IFQWIN

CALL SETMESSAGEQQ (msg,id)

msg | (Input) Character*(*). Message to be displayed. Must be a regular Fortran string, not a C string. Can include multibyte characters.
id | (Input) INTEGER(4). Identifier of the message to be changed. The following table shows the messages that can be changed and their identifiers:
Id | Message
--- | ---
QWIN$MSG_TERM | "Program terminated with exit code"
QWIN$MSG_EXITQ | "Exit Window"
QWIN$MSG_FINISHED | "Finished"
QWIN$MSG_PAUSED | "Paused"
QWIN$MSG_RUNNING | "Running"
QWIN$MSG_FILEOPENDLG | "Text Files(*.txt), *.txt; Data Files(*.dat), *.dat; All Files(*.*), *.*;"
QWIN$MSG_BMPSAVEDLG | "Bitmap Files(*.bmp), *.bmp; All Files(*.*), *.*;"
QWIN$MSG_INPUTPEND | "Input pending in"
QWIN$MSG_PASTEINPUTPEND | "Paste input pending"
QWIN$MSG_MOUSEINPUTPEND | "Mouse input pending in"
QWIN$MSG_SELECTTEXT | "Select Text in"
QWIN$MSG_SELECTGRAPHICS | "Select Graphics in"
QWIN$MSG_PRINTABORT | "Error! Printing Aborted."
QWIN$MSG_PRINTLOAD | "Error loading printer driver"
QWIN$MSG_PRINTNODEFAULT | "No Default Printer."
QWIN$MSG_PRINTDRIVER | "No Printer Driver."
QWIN$MSG_PRINTINGERROR | "Print: Printing Error."
QWIN$MSG_PRINTING | "Printing"
QWIN$MSG_PRINTCANCEL | "Cancel"
QWIN$MSG_PRINTINPROGRESS | "Printing in progress..."
QWIN$MSG_HELPNOTAVAIL | "Help Not Available for Menu Item"
QWIN$MSG_TITLETEXT | "Graphic"

QWIN$MSG_FILEOPENDLG and QWIN$MSG_BMPSAVEDLG control the text in file choosing dialog boxes and have the following syntax:

"file description, file designation"

You can change any string produced by QuickWin by calling SETMESSAGEQQ with the appropriate id. This includes status messages displayed at the bottom of a QuickWin application, state messages (such as "Paused"), and dialog box messages. These messages can include multibyte characters. To change menu messages, use MODIFYMENUSTRINGQQ.

## Example

     USE IFQWIN
     print*, "Hello"
     CALL SETMESSAGEQQ('Changed exit text', QWIN$MSG_EXITQ)

Parent topic: QuickWin Library Routines

## See Also

MODIFYMENUSTRINGQQ