Codejock Developer Community : Value changed of combo box http://forum.codejock.com/ Copyright (c) 2006-2013 Web Wiz Forums - All Rights Reserved. Wed, 13 May 2026 16:05:18 +0000 Tue, 08 Apr 2008 11:52:59 +0000 http://blogs.law.harvard.edu/tech/rss Web Wiz Forums 12.04 360 forum.codejock.com/RSS_post_feed.asp?TID=10026 <![CDATA[Codejock Developer Community]]> http://forum.codejock.com/forum_images/codejock-logo.gif http://forum.codejock.com/ <![CDATA[Value changed of combo box : Hi, Good for you. Now I can say...]]> http://forum.codejock.com/forum_posts.asp?TID=10026&PID=33322&title=value-changed-of-combo-box#33322 Author: Aaron
Subject: 10026
Posted: 08 April 2008 at 11:52am

Hi,

Good for you. Now I can say I helped someone with OpenEdge
 
]]> Tue, 08 Apr 2008 11:52:59 +0000 http://forum.codejock.com/forum_posts.asp?TID=10026&PID=33322&title=value-changed-of-combo-box#33322 <![CDATA[Value changed of combo box : Thank you It seems likeI finally...]]> http://forum.codejock.com/forum_posts.asp?TID=10026&PID=33314&title=value-changed-of-combo-box#33314 Author: torbenjc
Subject: 10026
Posted: 08 April 2008 at 8:36am

Thank you  It seems likeI finally got the update trigger to work!]]> Tue, 08 Apr 2008 08:36:49 +0000 http://forum.codejock.com/forum_posts.asp?TID=10026&PID=33314&title=value-changed-of-combo-box#33314 <![CDATA[Value changed of combo box : Hi, I do not understand how...]]> http://forum.codejock.com/forum_posts.asp?TID=10026&PID=33305&title=value-changed-of-combo-box#33305 Author: Aaron
Subject: 10026
Posted: 08 April 2008 at 6:44am

Hi,
 
I do not understand how your code works (and I thought I have seen them all ) but I see that you use a procedure to handle the ControlNotify event. You can do the same for the Update event (this event will be fired when commandbars needs to be updated). In your case detecting a value from the combobox. I guess this would be like this:
 
PROCEDURE CbfFrame.commandbarsframe.Update:
   DEFINE INPUT PARAMETER chSelf AS COM-HANDLE NO-UNDO.
   DEFINE INPUT PARAMETER iCode AS INTEGER NO-UNDO.
   DEFINE INPUT PARAMETER h1 AS HANDLE NO-UNDO.
   DEFINE OUTPUT PARAMETER lHandled AS LOGICAL NO-UNDO.
   CASE get-id(chSelf:ID):
        WHEN chSelf == "QFIELD":U THEN ????? compare the ID with the control given ID
 
        chSelf.listindex (this will be the index of selected item)
        chSelf.text (this will be the value of selected item)
 
   END CASE.
END PROCEDURE.
 
If this doesn't work (or if isn't possible) you better ask someone who is more experienced in your language.
]]> Tue, 08 Apr 2008 06:44:13 +0000 http://forum.codejock.com/forum_posts.asp?TID=10026&PID=33305&title=value-changed-of-combo-box#33305 <![CDATA[Value changed of combo box : Hi,CodeJock version 11.1.3 and...]]> http://forum.codejock.com/forum_posts.asp?TID=10026&PID=33285&title=value-changed-of-combo-box#33285 Author: torbenjc
Subject: 10026
Posted: 08 April 2008 at 2:14am

Hi,
CodeJock version 11.1.3 and the following (simplified) source written in OpenEdge, that I can't get to work.
When I run the GetSetQuickFilter procedure directly it works,n if I change the QMATCH edit field it works, but when I run it from the ControlNotify on value changed of 'QFIELD' it don't work :-(

/* Create of controls */
chQFilterItem = chQFilterBar:Controls:Add({&xtpControlComboBox}, add-id("QFIELD":U, "TOOL":U), "Field to filter on":T40).
chQFilterItem:WIDTH = 150.
CREATE bmopt.
ASSIGN
   bmopt.cAction = "QFIELD":U
   bmopt.main-type = "QFILTER":U
   bmopt.enable-when-clear = TRUE
   bmopt.chCodeJock = chQFilterItem
   bmopt.iCodeJockCreate = bm-option-icjseq
   bm-option-icjseq = bm-option-icjseq + 1.
FOR EACH ttBrwFld NO-LOCK WHERE ttBrwFld.cBrwID = ttBrw.cBrwID AND ttBrwFld.lInQuickFilter BY ttBrwFld.iSeq:
   chQFilterItem:AddItem(ttBrwFld.cFilterLabel).
END.
chQFilterItem:Listindex = 1.

chQFilterItem = chQFilterBar:Controls:Add({&xtpControlComboBox}, add-id("QOPER":U, "TOOL":U), "Filter operator":T40).
chQFilterItem:WIDTH = 150.
CREATE bmopt.
ASSIGN
   bmopt.cAction = "QOPER":U
   bmopt.main-type = "QFILTER":U
   bmopt.enable-when-clear = TRUE
   bmopt.chCodeJock = chQFilterItem
   bmopt.iCodeJockCreate = bm-option-icjseq
   bm-option-icjseq = bm-option-icjseq + 1.
chQFilterItem:AddItem("Includes":T25).
chQFilterItem:AddItem("Begins":T25).
chQFilterItem:AddItem("Greater than":T25).
chQFilterItem:AddItem("Greater than or equal":T25).
chQFilterItem:AddItem("Less than":T25).
chQFilterItem:AddItem("Less than or equal":T25).
chQFilterItem:AddItem("Equal to":T25).
chQFilterItem:AddItem("Not equal to":T25).
chQFilterItem:Listindex = 1.

chQFilterItem = chQFilterBar:Controls:Add({&xtpControlEdit}, add-id("QMATCH":U, "TOOL":U), "Filter match information":T40).
chQFilterItem:WIDTH = 150.
CREATE bmopt.
ASSIGN
   bmopt.cAction = "QMATCH":U
   bmopt.main-type = "QFILTER":U
   bmopt.enable-when-clear = TRUE
   bmopt.chCodeJock = chQFilterItem
   bmopt.iCodeJockCreate = bm-option-icjseq
   bm-option-icjseq = bm-option-icjseq + 1.
chQFilterItem:Text = "<Not selected>":T25.

/* Notify of value changes in controls */
PROCEDURE CbfFrame.commandbarsframe.ControlNotify:
   DEFINE INPUT PARAMETER chSelf AS COM-HANDLE NO-UNDO.
   DEFINE INPUT PARAMETER iCode AS INTEGER NO-UNDO.
   DEFINE INPUT PARAMETER h1 AS HANDLE NO-UNDO.
   DEFINE OUTPUT PARAMETER lHandled AS LOGICAL NO-UNDO.
   CASE get-id(chSelf:ID):
      WHEN "QFIELD":U OR WHEN "QOPER":U THEN IF iCode = 8 THEN RUN GetSetQuickFilter.
      WHEN "QMATCH":U THEN IF iCode = 512 THEN RUN GetSetQuickFilter.
   END CASE.
END PROCEDURE.

PROCEDURE GetSetQuickFilter PRIVATE:
   DEFINE BUFFER bmopt FOR bm-option.
   DEFINE BUFFER bmopt2 FOR bm-option.

   FOR FIRST bmopt WHERE bmopt.cAction = "QMATCH":U AND bmopt.main-type = "QFILTER":U NO-LOCK:
      bmopt.chCodeJock:Text = "<Not selected>":T25.
      FOR FIRST bmopt2 WHERE bmopt2.cAction = "QOPER":U AND bmopt2.main-type = "QFILTER":U NO-LOCK:
         IF VALID-HANDLE(bmopt2.chCodeJock) THEN bmopt2.chCodeJock:Listindex = 1.
         /*
         bmopt2.chCodeJock:Text = "Includes":T25.
         */
      END.
   END.
END PROCEDURE.

]]> Tue, 08 Apr 2008 02:14:15 +0000 http://forum.codejock.com/forum_posts.asp?TID=10026&PID=33285&title=value-changed-of-combo-box#33285 <![CDATA[Value changed of combo box : Hi, And again you can use...]]> http://forum.codejock.com/forum_posts.asp?TID=10026&PID=33234&title=value-changed-of-combo-box#33234 Author: Aaron
Subject: 10026
Posted: 07 April 2008 at 10:05am

Hi,
 
And again you can use the Update event.
 
Private Sub CommandBars_Update(ByVal Control As XtremeCommandBars.ICommandBarControl)
    Select Case Control.Id 
        Case <Your ID for the combobox comes here>
            msgbox Control.ListIndex
    End Select
End Sub
 
 
]]> Mon, 07 Apr 2008 10:05:08 +0000 http://forum.codejock.com/forum_posts.asp?TID=10026&PID=33234&title=value-changed-of-combo-box#33234 <![CDATA[Value changed of combo box : Hi, the update don&#039;t work...]]> http://forum.codejock.com/forum_posts.asp?TID=10026&PID=33227&title=value-changed-of-combo-box#33227 Author: torbenjc
Subject: 10026
Posted: 07 April 2008 at 7:39am

Hi,
the update don't work for me! Only fires when the control is added, not when its value is changed.
Have added messags to ControlNotify and found the following for Code:
Toglebox close/leave: 8
Text leave: 512
 
But now I'm having problem setting combobox control values from within this code using Listindex.
]]> Mon, 07 Apr 2008 07:39:10 +0000 http://forum.codejock.com/forum_posts.asp?TID=10026&PID=33227&title=value-changed-of-combo-box#33227 <![CDATA[Value changed of combo box : Hi, You can use the CommandBars...]]> http://forum.codejock.com/forum_posts.asp?TID=10026&PID=32924&title=value-changed-of-combo-box#32924 Author: Aaron
Subject: 10026
Posted: 01 April 2008 at 9:29am

Hi,
 
You can use the CommandBars UpdateEvent.
 
Private Sub CommandBars_Update(ByVal Control As XtremeCommandBars.ICommandBarControl)
    Select Case Control.Id
        Case ....
            Do something...
    End Select
End Sub
 
This event fires when something is clicked, expanded, collapsed (you name it) with CommandBars.
 
If you want no automatic updates set: Commandbars.Options.UpdatePeriod = 0
 
]]> Tue, 01 Apr 2008 09:29:20 +0000 http://forum.codejock.com/forum_posts.asp?TID=10026&PID=32924&title=value-changed-of-combo-box#32924 <![CDATA[Value changed of combo box : Hi, how to catch that the value...]]> http://forum.codejock.com/forum_posts.asp?TID=10026&PID=32920&title=value-changed-of-combo-box#32920 Author: torbenjc
Subject: 10026
Posted: 01 April 2008 at 8:42am

Hi,
 
how to catch that the value has been changed of a combo box in commandbar?
 
If it is the ControlNotify which codes to look for?
 
Because of problems with timer ActiveX we have set the update period to 24 hours, so that event won't work!
 
Regards,
Torben
]]> Tue, 01 Apr 2008 08:42:39 +0000 http://forum.codejock.com/forum_posts.asp?TID=10026&PID=32920&title=value-changed-of-combo-box#32920