I want to add a button to the title bar

I am not at my machine at the moment so I don`t have access to Progress/OpenEdge.
Though this may help:

DEFINE SUB-MENU SubFolder
MENU-ITEM SubItem1 LABEL "Ferrari-Marlboro"
MENU-ITEM SubItem2 LABEL "West-McLaren"
MENU-ITEM SubItem3 LABEL "MildSeven-Renault"
MENU-ITEM SubItem4 LABEL "BensonAndHedges-Jordan"
MENU-ITEM SubItem5 LABEL "LuckyStrike-BAR".

DEFINE MENU TopMenu MENUBAR
SUB-MENU SubFolder LABEL "Formula-1"
MENU-ITEM MenuExit LABEL "Exit".

ON MENU-DROP OF MENU SubFolder DO:
MESSAGE "Choose any F1 team to Your experience!"
VIEW-AS ALERT-BOX INFORMATION BUTTON OK
TITLE "Menu help".
/* realy at this place I update my "status string"
(it placed in different frame) with information
about current programm functions */
END.

CURRENT-WINDOW:MENUBAR = MENU TopMenu:HANDLE.
WAIT-FOR CHOOSE OF MENU-ITEM MenuExit OR
CLOSE OF CURRENT-WINDOW.
CURRENT-WINDOW:MENUBAR = ?.

It is really simple what U require, just an attribute.
Something like menubar:title = "whatever string here"

Good luck, I will have a look later when at my machine
 
Top