#7537
Support 3
Participant

You can add toolbar button to GroupWise Main Window or each message type (mail, task, note, etc) window. Open the Formativ IDE then go to the Integrations tab and check toolbar option. You may need to restart GroupWise to see the appropriate toolbar buttons appearing.

You can not change the toolbar button appearance as you described above. May be you can have two distinct applets to perform the task or you can change the applet operation based on a key pressed.

The sample code below add some text to the message subject when the toolbar button pressed. If the CTRL key was pressed when the applet execute then the applet will remove the text from the message subject. See the Formativ Language Guide for more information about the KeyIsDown method.

  
   dim OldSubject
   dim AddSubject

   call GroupWise.FocusSet(9, "")

   ' Is the CTRL key down?
   iRemoveText = utilities.KeyIsDown(VK_CONTROL)

   OldSubject = GroupWise.ItemGetText("X00", 9)
   AddSubject = "[somestring] "

   ' Remove text from the subject if the CTRL key down otherwise insert the text.
   if iRemoveText then
     If (InStr(1, OldSubject, AddSubject, vbTextCompare) > 0) then
       OldSubject = replace(OldSubject, AddSubject, " ", 1, -1, vbTextCompare)
       call GroupWise.ItemSetText("X00", 9,OldSubject, false)
     end if
   else
     If (InStr(1, OldSubject, AddSubject, vbTextCompare) > 0) then
       call GroupWise.ItemSetText("X00", 9,OldSubject, false)
     else
       call GroupWise.ItemSetText("X00", 9,AddSubject + OldSubject, false)
     end if
   end if

Hope this helps.

Regards,
Advansys Support