为编程爱好者分享易语言教程源码的资源网
好用的代理IP,游戏必备 ____广告位招租____ 服务器99/年 ____广告位招租____ ____广告位招租____ 挂机,建站服务器
好用的代理IP,游戏必备 ____广告位招租____ 服务器低至38/年 ____广告位招租____ ____广告位招租____ 挂机,建站服务器

网站首页 > 易语言相关 > 图形图像源码 正文

易语言API之在任何组件上画画源码

三叶资源网 2019-09-10 20:23:08 图形图像源码 1552 ℃ 3 评论
.版本 2
.支持库 spec

.程序集 窗口程序集1
.程序集变量 A, 整数型

.子程序 _按钮1_被单击
.局部变量 设备句柄, 整数型
.局部变量 画笔句柄, 整数型

标签1.重画 ()
延迟 (100)
设备句柄 = 取设备场景 (标签1.取窗口句柄 ())
画笔句柄 = 创建画笔 (1, 2, #黑色)
选入设备场景 (设备句柄, 画笔句柄)
本地画矩形 (到数值 (编辑框1.内容), 到数值 (编辑框2.内容), 到数值 (编辑框3.内容), 到数值 (编辑框4.内容), 设备句柄)

.子程序 本地画矩形
.参数 左上X, 整数型
.参数 左上Y, 整数型
.参数 矩形宽度, 整数型
.参数 矩形高度, 整数型
.参数 场景句柄, 整数型
.局部变量 前一个画笔位置, A

' 画直线 (场景句柄, 100, 100)
移动当前坐标点 (场景句柄, 左上X, 左上Y, 前一个画笔位置)
画直线 (场景句柄, 左上X + 矩形宽度, 左上Y)  ' 上边横线
画直线 (场景句柄, 左上X + 矩形宽度, 左上Y + 矩形高度)
画直线 (场景句柄, 左上X, 左上Y + 矩形高度)
画直线 (场景句柄, 左上X, 左上Y)

.子程序 __启动窗口_创建完毕

@1990343340

文件下载

来源:三叶资源网,欢迎分享,公众号:iisanye,(三叶资源网⑤群:21414575

已有3位网友发表了看法:

  • 访客

    访客  评论于 [2020-10-16 13:05:49]  回复

    牛逼

欢迎 发表评论:

百度站内搜索
关注微信公众号
三叶资源网⑤群:三叶资源网⑤群

网站分类
随机tag
HP-socket3图形按钮高级表格获取群成员Sqlite3数据库斗图神器公交查询系统Shell外壳编程多线程汇编RdRand加密解密语法提示python list调试端口检测弹幕监听HTML5布局之路炫彩易语言一条游走的龙腾讯url.cn短网址
最新评论