DefineWindowMenu

Top

Put in from menus, tool bars, etc. for the graphic arts or input window. If no menu kind is given, a new menu point is put on.

With DefineWindowMenu invested menus, tool bars, etc. are valid for the following meetings and become with DisplayWindowMenu indicated.

The function runs in an endless loop for arbitrarily many menu entries or badges which can be finished with ENTER. Within the loop the second endless loop runs for by the menu / The badge to be explained orders which is also finished with ENTER.

Condition

The name of the menu must be unequivocal, i.e. two menus with the same name cannot exist. If already a menu with the given name exists, is asked whether this should be extinguished.

Parametre

N<ame / menu name>

Name of the menu. If he is not given, it is asked for it.

S<tyle / badge style>

Style information from the worth MIS_TEXT, MIS_BITMAP, MIS_SUBMENU, 0. If not 0 are given, the well-chosen style is valid for all badges / menu entries. If the counter is not given, it is asked for every badge / menu entry for it.

A<ttributes / badge attributes>

Attribute information of the entries, mostly 0. If the counter is not given, it is asked for every badge / menu entry for the attributes.

Of <position / badge bottom>

Position of the new entries in the menu. Any number which determines the position or MIT_END for the end of the menu can be given. If the counter is not given, it is asked for every badge / menu entry for the attributes.

/SILENT

No issues are generated (Sensibly if the order from a Batchdatei is exclaimed without dialogues).

/ MENU-CASH

A menu is provided.

/SYSTEMMENUE

A system menu is provided (accessible about left upper corner of the graphic arts window).

/ TOOL-CASH

A tool bar (badge strip) is provided.

/ACCEL

A key abbreviation (Accelerator) is provided.

/POPUP

A Popup-menu (pop-up menu, legal mouse key menu) is provided.

/ STATUS-CASH

A status bar is provided.

/TEMP

Short help indicate

Return value

Value	Description
0	Representation successfully concluded
1	Short help was given
4	Internal mistake

Dialogue

Order give:DefineWindowMenu

Name of the menu:

MeinMenü

The query after the name of the menu is cancelled if the counter name / menu <name> is given. Existed already a menu with this name, comes the query:

Menu already exists. Should it be extinguished? [Ja|Nein] (N) n

With j the old menu is extinguished and a new one is put on. With n there comes the query:

Should the menu be complemented? [Ja|Nein] (N) j

Style of the Menüitems give:

(MIS_TEXT, MIS_BITMAP, MIS_SUBMENU)

MIS_TEXT

MIS_TEXT provides workable text menus, MIS_BITMAP generates badges, MIS_SUBMENÜ an untermenu (drop Down menu) in which afterwards text menus or badges can be inserted generates. The query is cancelled if the counter <style / badge style> is given.

Attribute of the Menüitems give:

The zero is intended with this order only as an input proposal. It <>can be confirmed not by an easy pressure of <Enter>, but must be specially given. The query is cancelled if the counter <attribute / badge attribute> is given.

Text of the Menüitems give:

Kontextmenü1

Position of the Menüitems give:

(MIT_END)

MIT_END

Beside the suggested input MIT_END which provides for the fact that the new menu is suspended to existing behind the actual position of the new menu can be given at this point also as a number. The query is cancelled if the counter of <position / badge bottom> is given.

Implementation of the Menüitems give:

(Bsp.: EOJ)

Echo Kontextmenü1 called

As an example slightly to be understood only one echo and a space is programmed here. Several commands can be also given. The function runs in an endless loop which is finished with Enter, or a space. Then follows the next badge / menu entry.

Style of the Menüitems give:

(MIS_TEXT, MIS_BITMAP, MIS_SUBMENU)

Order give:

The input of Enter finishes the endless loop in which the function runs.

Example

After input of the following lines, and the new start of Moskito stands the menu Point Test, under the menu point File, in the standard menu at the possession.

DefineWindowMenu attribute / 0, position / 1 name / Menu:Standard

MIS_TEXT

&Datei|Test

Echo hello test