介绍
这篇文章给大家介绍怎么在易语言中自定义一个外形按钮,内容非常详细,感兴趣的小伙伴们可以参考借鉴,希望对大家能有所帮助。
1,新建一个“易语言“窗口程序
2,添加组件——一个画板到窗口内
为了方便定位按钮的位置
你可以把画板的宽度设置为:80年,高度也设置为:80
为了清楚画板在哪里,可以把底色设置成你喜欢的颜色
3,然后就可以输入代码了
先输入变量代码,代码如下:
。版本,2 。程序集,窗口程序集_启动窗口 。程序集变量,鼠标停留在画板内,,逻辑型 。程序集变量,鼠标移动在画板内,,逻辑型 。程序集变量,横坐标,,整数型 。程序集变量,纵坐标,,整数型 。程序集变量,半径,,整数型 。程序集变量,x,,双精度小数型 。程序集变量,y,,双精度小数型 ,子程序,__启动窗口_创建完毕 横坐标,=,50,& # 39;,设置变量数的值 纵坐标,=,50,& # 39;,设置变量数的值 半径,=,25,& # 39;,设置变量数值
1,添加画板焦点颜色
先绘画画板外形
代码如下:
。版本,2 ,子程序,_画板1 _绘画 。参数,重画区左边,,整数型 。参数,重画区上,边,整数型 。参数,重画区右边,,整数型 。参数,重画区下边,,整数型 画板1。画椭圆,(横坐标,安康;半径,,纵坐标,安康;半径,,横坐标,+,半径,,纵坐标,+,半径),& # 39;,画板1。画椭圆,你可以替换成,画板1。画矩形,等其他形状
2,添加画板焦点图片
代码如下:
。版本,2 ,子程序,_画板1 _鼠标位置被移动,,逻辑型 。参数,横向位置,,整数型,,,,鼠标指针横向位置 。参数,纵向位置,,整数型,,,,鼠标指针纵向位置 。参数,功能键状态,,整数型 时间=x 横向位置,安康;横坐标 时间=y 纵向位置,安康;纵坐标 。如果,(x ×, x +, y ×, y <,半径,×,半径),& # 39;,检测鼠标指针位置是否在画板内 ,。如果,(鼠标停留在画板内) ,,,否则 ,,,画板1。刷子颜色,=,#浅灰 ,。如果结束 ,。如果真,(取反,(鼠标移动在画板内)) ,,,画板1。重画,(),& # 39;,重画,画板1。刷子颜色,=,#浅灰 ,。如果真结束 鼠才能标移动在画板内,=,真,& # 39;,等于真则返回假——鼠标离开画板后画板颜色改变,等于假则返回真——鼠标离开画板后画板颜色不变 否,则 画才能板1。刷子颜色,=,#白色 ,。如果真,(鼠标移动在画板内) ,,,画板1。重画,(),& # 39;,重画,画板1。刷子颜色,=,#白色 ,。如果真结束 鼠才能标移动在画板内,=,假,& # 39;,等于真则返回假——鼠标离开画板后画板颜色改变,等于假则返回真——鼠标离开画板后画板颜色不变
3,按F5运行看看
当鼠标停留在画板内,画板颜色就会变成灰色
当鼠标离开在画板内,画板颜色就会变成白色
1,添加画板按钮效果
命令及变量我已经解释过了,就不多解释了
直接输入代码,代码如下:
。版本,2 ,子程序,_画板1 _鼠标左键被按下,,逻辑型 。参数,横向位置,,整数型 。参数,纵向位置,,整数型 。参数,功能键状态,,整数型 时间=x 横向位置,安康;横坐标 时间=y 纵向位置,安康;纵坐标 。如果真,(x ×, x +, y ×, y怎么在易语言中自定义一个外形按钮