功能:为对象获取焦点

格式:SetObjFocus(obj)
obj :为对象变量

说明:
1、本函数本质是执行对象Focus函数
2、执行成功返回1,否则返回0