WinBatch Tech Support Home

Database Search

If you can't find the information using the categories below, post a question over in our WinBatch Tech Support Forum.

TechHome

WinBatch
Dialog Editor
Dialog Editor version 6.X
Samples

Can't find the information you are looking for here? Then leave a message over on our WinBatch Tech Support Forum.

Check Value of Checkbox In Dialog Callback Procedure

Question:

Is there a way to get the current value of a checkbox group variable, without closing the dialog? I have a row of checkboxes with one variable, all of them assigned a different value, 1,2,4,8,16,32,64,128,256. When one of them get's checked or unchecked I would like to get the total amount of the variable. When the dialog closes I get the result ok, but i'd like to keep the dialog open.

This is the whole dialog: 


MyDialogFormat=`WWWDLGED,6.1`

MyDialogCaption=`ZoekAccount`
MyDialogX=092
MyDialogY=147
MyDialogWidth=284
MyDialogHeight=122
MyDialogNumControls=033
MyDialogProcedure=`GetObjectProperties`
MyDialogFont=`DEFAULT`
MyDialogTextColor=`DEFAULT`
MyDialogBackground=`DEFAULT,DEFAULT`
MyDialogConfig=0

;nn=`x,y,width,height,type,var,"text/pre-selected item",value,tab-order,style,font,textcolor,backgroundcolor`
MyDialog001=`245,107,032,010,PUSHBUTTON,DEFAULT,"Cancel",0,7,DEFAULT,DEFAULT,DEFAULT,DEFAULT`
MyDialog002=`005,005,036,010,EDITBOX,NamePattern,"loginnaam",DEFAULT,1,DEFAULT,DEFAULT,DEFAULT,DEFAULT`
MyDialog003=`005,017,036,010,PUSHBUTTON,DEFAULT,"Zoek",2,2,DEFAULT,DEFAULT,DEFAULT,DEFAULT`
MyDialog004=`111,107,036,010,EDITBOX,NewPasswd,"12345",DEFAULT,4,DEFAULT,DEFAULT,DEFAULT,DEFAULT`
MyDialog005=`149,107,022,010,PUSHBUTTON,DEFAULT,"Wijzig",1,6,DEFAULT,DEFAULT,DEFAULT,DEFAULT`
MyDialog006=`005,031,272,058,MULTILINEBOX,UserData,"Nog geen info",DEFAULT,8,DEFAULT,DEFAULT,DEFAULT,DEFAULT`
MyDialog007=`045,005,232,022,ITEMBOX,NamePatternList,DEFAULT,DEFAULT,3,DEFAULT,DEFAULT,DEFAULT,DEFAULT`
MyDialog008=`039,107,016,010,SPINNER,Grace,"-1",DEFAULT,9,2,DEFAULT,DEFAULT,DEFAULT`
MyDialog009=`005,107,034,012,CHECKBOX,UsrDis,"Disabled",1,10,DEFAULT,DEFAULT,DEFAULT,DEFAULT`
MyDialog010=`057,109,032,008,STATICTEXT,DEFAULT,"GraceLogins",DEFAULT,9,DEFAULT,DEFAULT,DEFAULT,DEFAULT`
MyDialog011=`005,093,032,010,PUSHBUTTON,DEFAULT,"Homedir",3,4,DEFAULT,DEFAULT,DEFAULT,DEFAULT`
MyDialog012=`175,107,036,010,PUSHBUTTON,DEFAULT,"Remote",4,5,2,DEFAULT,DEFAULT,DEFAULT`
MyDialog013=`041,095,006,008,CHECKBOX,UsrRights,DEFAULT,256,13,2,DEFAULT,DEFAULT,DEFAULT`
MyDialog014=`049,095,006,008,CHECKBOX,UsrRights,DEFAULT,1,14,2,DEFAULT,DEFAULT,DEFAULT`
MyDialog015=`057,095,006,008,CHECKBOX,UsrRights,DEFAULT,2,15,2,DEFAULT,DEFAULT,DEFAULT`
MyDialog016=`065,095,006,008,CHECKBOX,UsrRights,DEFAULT,16,16,2,DEFAULT,DEFAULT,DEFAULT`
MyDialog017=`073,095,006,008,CHECKBOX,UsrRights,DEFAULT,8,17,2,DEFAULT,DEFAULT,DEFAULT`
MyDialog018=`081,095,006,008,CHECKBOX,UsrRights,DEFAULT,128,18,2,DEFAULT,DEFAULT,DEFAULT`
MyDialog019=`089,095,006,008,CHECKBOX,UsrRights,DEFAULT,64,19,2,DEFAULT,DEFAULT,DEFAULT`
MyDialog020=`097,095,006,008,CHECKBOX,UsrRights,DEFAULT,32,20,2,DEFAULT,DEFAULT,DEFAULT`
MyDialog021=`041,089,004,008,STATICTEXT,DEFAULT,"S",DEFAULT,21,DEFAULT,DEFAULT,DEFAULT,DEFAULT`
MyDialog022=`049,089,004,008,STATICTEXT,DEFAULT,"R",DEFAULT,21,DEFAULT,DEFAULT,DEFAULT,DEFAULT`
MyDialog023=`057,089,006,008,STATICTEXT,DEFAULT,"W",DEFAULT,21,DEFAULT,DEFAULT,DEFAULT,DEFAULT`
MyDialog024=`065,089,004,008,STATICTEXT,DEFAULT,"E",DEFAULT,21,DEFAULT,DEFAULT,DEFAULT,DEFAULT`
MyDialog025=`073,089,004,008,STATICTEXT,DEFAULT,"C",DEFAULT,21,DEFAULT,DEFAULT,DEFAULT,DEFAULT`
MyDialog026=`081,089,006,008,STATICTEXT,DEFAULT,"M",DEFAULT,21,DEFAULT,DEFAULT,DEFAULT,DEFAULT`
MyDialog027=`091,089,004,008,STATICTEXT,DEFAULT,"F",DEFAULT,21,DEFAULT,DEFAULT,DEFAULT,DEFAULT`
MyDialog028=`099,089,004,008,STATICTEXT,DEFAULT,"A",DEFAULT,21,DEFAULT,DEFAULT,DEFAULT,DEFAULT`
MyDialog029=`111,093,036,010,EDITBOX,SpaceUsed,DEFAULT,DEFAULT,29,74,DEFAULT,DEFAULT,DEFAULT`
MyDialog030=`149,095,022,008,STATICTEXT,DEFAULT,"Kb Used",DEFAULT,30,DEFAULT,DEFAULT,DEFAULT,DEFAULT`
MyDialog031=`175,093,036,010,EDITBOX,SpaceLimit,DEFAULT,DEFAULT,30,66,DEFAULT,DEFAULT,DEFAULT`
MyDialog032=`213,095,022,008,STATICTEXT,DEFAULT,"Kb Limit",DEFAULT,30,DEFAULT,DEFAULT,DEFAULT,DEFAULT`
MyDialog033=`245,093,032,010,PUSHBUTTON,DEFAULT,"Apply",5,33,2,DEFAULT,DEFAULT,DEFAULT`
Does anyone have any Ideas?

Answer:

You will need to create a dialog callback procedure. With the code: 

case MSG_CHECKBOX
    URValue=0
    For xx=13 To 20
       URValue=URValue + (DialogControlGet(handle,xx,DC_CHECKBOX) * ItemExtract(xx-12,"256 1 2 16 8 128 64 32"," "))
    Next

User Reply:

It does work. Thanks a lot. 
Article ID:   W16419

File Created: 2005:02:18:12:20:28
Last Updated: 2005:02:18:12:20:28