MnInsertPopup

MnInsertPopup fügt einen Popup-Menüeintrag in ein Menü ein.

bool = MnInsertPopup(ssMenu, nMenu, nItem, ssMenuString, ssPopupName)

Returnwert

bool ist TRUE (1) wenn das Menü-Item eingefügt werden konnte und sonst FALSE (0).

Parameter

ssMenu

ist der Name der Menüleiste (menu bar). Es gibt folgende Menüleisten:

Wert Bedeutung
„Editor“ Dieses Menü wird angezeigt, wenn ein Editor aktiv ist.
„Document“ Dieses Menü wird angezeigt, wenn ein Dokument mit Diagrammseiten aktiv ist.
„DocumentServer“ Dieses Menü wird angezeigt, wenn eine UniPlot-Dokumentseite in einem anderen Anwendungsprogramm eingebettet ist (OLE).
„Command“ Dieses Menü wird angezeigt, wenn das UniScript-Kommandofenster aktiv ist.
„Main“ Dieses Menü wird angezeigt, wenn keine MDI-Fenster im UniPlot-Hauptfenster vorhanden sind. Das ist normalerweise der Fall nachdem UniPlot gestartet wurde.
nMenu

nMenu ist die Position im Hauptmenü. Der am weitestens links stehende Eintrag (i. Allg. das Datei-Menü) hat die Position 1.

nItem

nItem ist die Position des Menüs innerhalb des Menüs nMenu. Um ein Element am Ende des Menüs einzutragen, geben Sie -1 ein.

ssMenuString

ssMenuString ist eine Zeichenkette, die wie angegeben im Menü erscheint. Will man einen Buchstaben des Menüeintrags unterstreichen, damit der Menüpunkt leichter mit der Tastatur ausgewählt werden kann, muss vor den Buchstaben ein kaufmännisches Und eingegeben werden, z. B. "&Help".

ssPopupName

ssPopupName ist der Name eines Menüs, das mit der Funktion MenuCreatePopup erzeugt worden ist.

Kommentar

Wenn Sie ein Menü erzeugen möchten, erstellen Sie im autoload-Verzeichnis eine ic-Datei.

Siehe Beispiel.

Beispiel

Zunächst wird eine Funktion geschrieben, die beim Betätigen eines Menüpunktes ausgeführt werden soll:

// Only one function specified in this example
def MyFunc1()
{
    MessageBox("In MyFunc1");
}
def MenuTest()
{
    RegisterCommand("2D-Dataset", "MyFunc1", "2D-My Function 1");
    RegisterCommand("2D-Dataset", "MyFunc2", "2D-My Function 2");
    RegisterCommand("2D-Dataset", "MyFunc3", "2D-My Function 3");
    RegisterCommand("2D-Dataset", "MyFunc4", "2D-My Function 4");
    RegisterCommand("2D-Dataset", "MyConfig", "Configuration....");
    MenuCreatePopup("MyFunction", [..
        "Group1@ My Group1";
        "Group2@ My Group2";
        "";
        "MyConfig"]);
    MenuCreatePopup("Group1", [..
        "MyFunc1";
        "";
        "MyFunc2"]);
    MenuCreatePopup("Group2", [..
        "MyFunc3";
        "MyFunc4"]);
    // Insert into the Tools menu of a IPW document :
    svStrings = MnGetStrings("Document");
    iPos = findfirst(svStrings == "&Extras");  // &Tools
    if (iPos != 0) {
        MnInsertPopup("Document", iPos, 3, "My Function", "MyFunction");
    } else {
        // Tools not found, insert in menu 2
        MnInsertPopup("Document", 2, 3, "My Function", "MyFunction");
    }
    MnDrawMenuBar();
}
MenuTest()

History

Version Beschreibung
5.10.0 Neu

id-1557536