>FUNCTION Form_Has_This_Control > PARAMETER PARAM_Form_Ref , PARAM_Control_Name > > LOCAL int_Control_Count > LOCAL int_Control_Index > LOCAL str_Control_Name > LOCAL boo_Value_To_Return > > boo_Value_To_Return = .F. > int_Control_Count = PARAM_Form_Ref.CONTROLCOUNT > > FOR int_Control_Index = 1 TO int_Control_Count > str_Control_Name = PARAM_Form_Ref.CONTROLS(int_Control_Count).NAME > IF ( str_Control_Name = PARAM_Control_Name ) > boo_Value_To_Return = .T. > ENDIF > ENDFOR > > RETURN ( boo_Value_To_Return ) >ENDFUNC >>