Write to Left on Msgbar insert a button

[Silvio.Falconi]

on Msgbar I must write a message and insert a button after the txt with an action

Code: Select all  Expand view

 oApp:oWndMain:oMsgBar:cMsgDef:=""
   cMessage:="Elementi Totali:"+str(nElementiTotali)+" | "+;
             "Liberi:"+str(nElementiLiberi)+" | "+;
             "Occupati :"+str(nElementiOcc)
 

but on Main this have another message (cmsgBar) with not buttons

SET MESSAGE OF ::oWndMain TO ::cMsgBar NOINSET



then I have another msgitems as you can see on picture but I wish use the first al left

I tried to create one empty

DEFINE MSGITEM ::oMsgItem1;
OF ::oWndMain:oMsgBar;
PROMPT "";
SIZE 120;
TOOLTIP " "

and then disable it with Hide () /disable() but it doesn't work it is showed at init

How I can to insert a temporaney button and erase all when I close the procedure reinserted the oldest cMsgbar ?


Now I try to insert anothe msgitem

It could go good but How I can make to insert the button on right , so at left of txt message ?