Missing DeleteHiddenCommand

Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic

   Hi

I can set a command in a commandbar as hidden with the method .AddHiddenCommand <ID>. But I miss .DeleteHiddenCommand <ID> and .DeleteAllHiddenCommands!

I need this because I create a dynamic pop up menu with some hidden command buttons. Each time I create this, the previously added hidden IDs are still there.  Here a simplified sample:

Sub ShowPopup(ByVal Hidden As Integer)
  Set POPUP=ffMain.CommandBars.Add("POPUP",xtpBarPopup")
  For i=0 to 5
    Set Control=POPUP.Controls.Add(xtpControlButton,i,CStr(i))
    if i=Hidden Then ffMain.CommandBars.Options.AddHiddenCommand i
  Next i

  POPUP.ShowPopup
  POPUP.Controls.DeleteAll
  Set POPUP=Nothing
End Sub

If I call this Sub more than once with different arguments 'Hidden' the hidden commands accumulate but I need to hide only this one.

BETTER: The added hidden command should be removed if the control was removed (.Controls.DeleteAll).

Thanks for looking at this

Author	Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic
Fabian Members Profile Send Private Message Find Members Posts Add to Buddy List Senior Member Joined: 22 November 2004 Location: Switzerland Status: Offline Points: 336	Post Options Post Reply Quote Fabian Report Post Thanks(0) Quote Reply Topic: Missing DeleteHiddenCommand Posted: 14 December 2008 at 6:48am
	Hi I can set a command in a commandbar as hidden with the method .AddHiddenCommand <ID>. But I miss .DeleteHiddenCommand <ID> and .DeleteAllHiddenCommands! I need this because I create a dynamic pop up menu with some hidden command buttons. Each time I create this, the previously added hidden IDs are still there. Here a simplified sample: Sub ShowPopup(ByVal Hidden As Integer) Set POPUP=ffMain.CommandBars.Add("POPUP",xtpBarPopup") For i=0 to 5 Set Control=POPUP.Controls.Add(xtpControlButton,i,CStr(i)) if i=Hidden Then ffMain.CommandBars.Options.AddHiddenCommand i Next i POPUP.ShowPopup POPUP.Controls.DeleteAll Set POPUP=Nothing End Sub If I call this Sub more than once with different arguments 'Hidden' the hidden commands accumulate but I need to hide only this one. BETTER: The added hidden command should be removed if the control was removed (.Controls.DeleteAll). Thanks for looking at this
	Product: Xtreme SuitePro (ActiveX) version 16.2.3 Platform: Windows 7 (32bit) Language: Visual Basic 6.0 / SP6

Oleg Members Profile Send Private Message Find Members Posts Add to Buddy List Admin Group Joined: 21 May 2003 Location: United States Status: Offline Points: 11234	Post Options Post Reply Quote Oleg Report Post Thanks(0) Quote Reply Posted: 15 December 2008 at 1:29am
	Hi, Thanks, RemoveHiddenCommands added.
	Oleg, Support Team CODEJOCK SOFTWARE SOLUTIONS

Fabian Members Profile Send Private Message Find Members Posts Add to Buddy List Senior Member Joined: 22 November 2004 Location: Switzerland Status: Offline Points: 336	Post Options Post Reply Quote Fabian Report Post Thanks(0) Quote Reply Posted: 15 December 2008 at 3:54am
	Thanks for adding the new method. Would it be possible to download the changed OCX? Thanks again!
	Product: Xtreme SuitePro (ActiveX) version 16.2.3 Platform: Windows 7 (32bit) Language: Visual Basic 6.0 / SP6

Oleg Members Profile Send Private Message Find Members Posts Add to Buddy List Admin Group Joined: 21 May 2003 Location: United States Status: Offline Points: 11234	Post Options Post Reply Quote Oleg Report Post Thanks(0) Quote Reply Posted: 16 December 2008 at 2:03am
	Hi, Send email to support.
	Oleg, Support Team CODEJOCK SOFTWARE SOLUTIONS