CHECKBOX in the FORM during the while loop

Hi everybody,
do you know how is possible to check CHECKBOX in the FORM during the while loop?
In my FORM I have two checkboxes. In the EVENT procedure (including a WHILE loop) I want implement in the PICK section:

     "Do something 1" if CHECKBOX1 in the FORM is checked
     "Do something 2" if CHECKBOX2 in the FORM is checked

In my code this not works, because the CHECKBOX in the FORM cannot not be CHECKED in the loop. The loop must be interrupted (e.g. with axlCancelOn())  to make check in the FORM.
Do you know if this works without interruption?

Hier is example:

test_form = axlFormCreate( (gensym) "test_form.form" nil 'test _action t)
(including CHECKBOX 1 and CHECKBOX 2)

procedure( test_form()
eventMask = '( PICK CANCEL DONE)
loop = t
while( loop   
   
     event = axlEnterEvent(eventMask, nil, t)
     case(event -> type
    
     ('PICK             
        if CHECKBOX 1 then do work 1…..
        if CHECKBOX 2 then do work 2…..    
     ); end PICK

 ('CANCEL
     printf("End of Loop")
     loop=nil        
 );end CANCEL
  );end while
  );end case      
);end procedure

Thanks
JuriV