Codejock Developer Community : Enable/Disable http://forum.codejock.com/ Copyright (c) 2006-2013 Web Wiz Forums - All Rights Reserved. Wed, 10 Jun 2026 05:10:20 +0000 Mon, 21 Aug 2006 14:53:53 +0000 http://blogs.law.harvard.edu/tech/rss Web Wiz Forums 12.04 360 forum.codejock.com/RSS_post_feed.asp?TID=4843 <![CDATA[Codejock Developer Community]]> http://forum.codejock.com/forum_images/codejock-logo.gif http://forum.codejock.com/ <![CDATA[Enable/Disable : Hi, code looks right. What error...]]> http://forum.codejock.com/forum_posts.asp?TID=4843&PID=15071&title=enable-disable#15071 Author: Oleg
Subject: 4843
Posted: 21 August 2006 at 2:53pm

Hi,
code looks right. What error text you see?
]]> Mon, 21 Aug 2006 14:53:53 +0000 http://forum.codejock.com/forum_posts.asp?TID=4843&PID=15071&title=enable-disable#15071 <![CDATA[Enable/Disable : Hi, I am trying to enable a button...]]> http://forum.codejock.com/forum_posts.asp?TID=4843&PID=15070&title=enable-disable#15070 Author: moe188
Subject: 4843
Posted: 21 August 2006 at 2:22pm

Hi,
I am trying to enable a button at run-time erroe but for some reason I can not get it to work and I am recieving a error message:
 
 
My code:
 
Set ControlFile = MenuBar.ActiveMenuBar.Controls.Add(xtpControlPopup, 0, "&File")
 With ControlFile.CommandBar.Controls
        .Add xtpControlButton, FILE_NEW, "&New"
        .Add xtpControlButton, FILE_OPEN, "&Open"
        Set Control = .Add(xtpControlButton, FILE_SAVE, "&Save"):  Control.BeginGroup = True: Control.Enabled = False
        Set Control = .Add(xtpControlButton, FILE_PRINT, "&Print"): Control.Enabled = False
        Set Control = .Add(xtpControlButton, FILE_EXIT, "&Exit"): Control.BeginGroup = True
End With
 
and within the commandbar_update
select case control.id
case FILE_PRINT: if PName="" then control.enable=false else control.enable=true
end select
 
 
Please Help!
]]> Mon, 21 Aug 2006 14:22:27 +0000 http://forum.codejock.com/forum_posts.asp?TID=4843&PID=15070&title=enable-disable#15070