Control name as string ??

My old memoty is failing me.
Is there a way to identify a control by a string instead of it's object name.

eg, I thought I could do this ... but it's failing with an 'Error: expected more arguments"
It's been a while since I've used OpenDCL and my grey stuff is slowing down ...


  (setq controlList '("Top" "Bottom"    "Front"    "Back"      "Left"
                            "Right"    "isoSW"    "isoSE"    "isoNE"
                            "isoNW"    "isoSWB"    "isoSEB"    "isoNEB"
                            "isoNWB"    "30+30"    "50+30"    "130+30"
                            "150+30"    "200+30"    "230+30"    "310+30"
                            "310+30"    "30-30"    "50-30"    "130-30"
                            "150-30"    "200-30"    "230-30"    "310-30"
                            "330-30"
                          )
  )
  (setq valuesList '())
  ;;-------------------------------------------
  ;;-------------------------------------------
  (defun c:UCSer_Form_TextButton1_OnClicked (/)
    (foreach name controlList
      (if (= 1 (dcl_Control_GetValue (strcat "UCSer_Form_" name)))
          (setq valuesList (cons name valuesList))
      )
    )
    (dcl_Form_Close UCSer_Form)
    ;;  (cond
    ;;    ( ( )    )
    ;;    )
  )


Regards,

Sorted !




      (if (= 1 (dcl_Control_GetValue "UCSer" "Form"  name))
        (setq valuesList (cons name valuesList))
      )



did the trick.