Enable and Disable

[eptownie1988]

I am having trouble writing the code for the following situation.

I have a checkbox that is enabled and a textbox that is disabled and I want the dialog to function as follows:

If the checkbox is selected then I want to enable to textbox for input (this I have accomplished)

(defun c:ITEXT_Form1_Node_CheckBox_OnClicked (nValue /)
  (dcl_Control_SetEnabled ITEXT_Form1_Node_TextBox T)
)


If the checkbox is unselected I want to redisable the textbox.  This is where I am stuck.

Any help would be appreciated.  Thank you.

[BazzaCAD]

Try...

Code (autolisp) Select Expand


(defun c:ITEXT_Form1_Node_CheckBox_OnClicked (nValue /)
  (if (= nValue 1)
    (dcl_Control_SetEnabled ITEXT_Form1_Node_TextBox T)
    (dcl_Control_SetEnabled ITEXT_Form1_Node_TextBox nil)
  )
)


[eptownie1988]

Barry:

Thank you I was on the right track but I was trying to use (2) two if statements in front of the (DCL_Control_SetEnabled.....) lines of code.  This forum has definitely the best moderators I have ever experienced in a forum.  I have posted several questions and received replies very quickly and with accurate information from the start.  OpenDCL is an amazing program as well are the people who support it.  Keep up the great work.

[BazzaCAD]

thx, glad we can help. :)