submenüs erzeugen

[lbccaleb]

ich habs jetzt rausbekommen wie es genau geht, naja hätt ich eigentlich auch gleich drauf kommen können!!

naja wen es intressiert der kann hier nen kleinen blick haschen wie ichs gemacht hab..:

Delphi-Quellcode:

            hm := CreatePopupMenu; // hauptmenü erstellen
            hmsub := CreatePopupMenu; // Untermenü erstellen

            AppendMenu(hmsub, MF_STRING, IDM_ENGLISH, 'English'); //untermenü mit links versehen

            AppendMenu(hm, MF_STRING, IDM_SHOW, 'Show'); //hauptmenü mit links versehen
            AppendMenu(hm, MF_POPUP, hmsub, 'haupmenü'); //untermenü dem hauptmenü zuordnen

            DestroyMenu(hmsub); // und natürlich alles wieder beseitigen
            DestroyMenu(hm); // und natürlich alles wieder beseitigen

das sollte reichen!!