前两天群里面有个哥们咨询怎么控制Citext.textbox控件的字体,我尝试着做了练习,还是比较简单的。假设Citext.textbox控件编号是AN4,写下面的脚本:
FUNCTION Citext_Fontini()
OBJECT citext
citext=ObjectByName('AN4')
_ObjectSetProperty(citext,'text','这是一个测试')
_ObjectSetProperty(citext,'FontName','微软雅黑')
_ObjectSetProperty(citext,'FontBold',True)
_ObjectSetProperty(citext,'FontSize','36')
_ObjectCallMethod(citext,'UpdateText')
END
上面的脚本设置了该控件的文字、字体、是否加粗、大小。
画面上在某个按钮的鼠标点击事件执行上面的脚本,最终效果就是这个样子,注意设置字体大小脚本那里,属性值是字符串的样式,直接写成整数不会有效果。

FUNCTION Citext_Fontini()
OBJECT citext
citext=ObjectByName('AN4')
_ObjectSetProperty(citext,'text','这是一个测试')
_ObjectSetProperty(citext,'FontName','微软雅黑')
_ObjectSetProperty(citext,'FontBold',True)
_ObjectSetProperty(citext,'FontSize','36')
_ObjectCallMethod(citext,'UpdateText')
END
上面的脚本设置了该控件的文字、字体、是否加粗、大小。
画面上在某个按钮的鼠标点击事件执行上面的脚本,最终效果就是这个样子,注意设置字体大小脚本那里,属性值是字符串的样式,直接写成整数不会有效果。
