Popup menu

[Time_Runner]

I am trying to make a popup menu that is just a little different then other popup menus.

For example I will use Microsoft Words menu when you click on the right mouse button:
,case WM_CONTEXTMENU
,sel GetWinId(wParam)
,,case 3
,,PopupMenu("Menu Definel555")

Macro

Code:

Copy      Help

BEGIN MENU
Cu&t : 22101 0 0
&Copy : 22102 0 0
&Past : 22103 0 0
-
&Font… : 22104 0 3
&Paragraph… : 22105 0 0
Bullets and &Numbering… : 22106 0 0
-
&Hyperlink… : 22107 0 0
-    
S&ynonyms
,>(No Suggestions) : 22108 0 0
,-
,&Thesaurus… : 22109 0 3
,<
Select text with Similar Formatting : 22110 0 0
Tr&anslate : 22111 0 0
END MENU

I even tried:
mac "Menu Definel555"

Macro

Code:

Copy      Help

sel(PopupMenu("Cu&t[]&Copy[]&Past[]-[]&Font…[]&Paragraph…[]Bullets and &Numbering…[]-[]&Hyperlink…[]S&ynonyms[](No Suggestions)[]-[]&Thesaurus…[]Select text with Similar Formatting[]Tr&anslate[]"))
,case 1 out "1"
,case 2 out "2"
,case 3 out "3"
,case 4 out "4"
,case 5 out "5"
,case 6 out "6"
,case 7 out "7"
,case 8 out "8"
,case 9 out "9"
,case 10 out "10"
,case 11 out "11"
,case 12 out "12"
,case 13 out "13"
,case 14 out "14"
,case 15 out "15"

   
I want to be able to use the little arrow that allows you to use submenus. Is this possible?

[Gintaras]

Macro

Code:

Copy      Help

_s=
;Cu&t
;&Copy
;&Past
;-
;&Font…
;&Paragraph…
;Bullets and &Numbering…
;-
;&Hyperlink…
;>S&ynonyms
;(No Suggestions)
;-
;&Thesaurus…
;<
;Select text with Similar Formatting
;Tr&anslate

sel(PopupMenu(_s))
,case 1 out "1"
,case 2 out "2"
,case 3 out "3"
,case 4 out "4"
,case 5 out "5"
,case 6 out "6"
,case 7 out "7"
,case 8 out "8"
,case 9 out "9"
,case 10 out "10"
,case 11 out "11"
,case 12 out "12"
,case 13 out "13"
,case 14 out "14"
,case 15 out "15"

[Time_Runner]

Gintaras you know how to do everything.