Question

易语言怎么分割图片

将这图片分割4X4,求代码,求逻辑

Answer 1

以下有两种方法，因为不支持PNG的关系我把图片转到BMP了(PNG图片可用E3D或GDI或动画框等)

 E2D 方法 支持透明，不支持PNG图片========================================

.版本 2

.支持库 EdirectX

.程序集 窗口程序集1

.程序集变量 屏幕, 屏幕

.程序集变量 page, 页面

.程序集变量 page2, 页面

.程序集变量 矩形, 矩形

.程序集变量 状态, 整数型

.程序集变量 a, 整数型

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

_启动窗口.宽度 ＝ 430

_启动窗口.高度 ＝ 360

屏幕.创建窗口模式 (取窗口句柄 (), 取用户区宽度 (), 取用户区高度 ())

page ＝ 屏幕.取后台页面 ()

page2.建位图页面 (屏幕, “C:\Documents and Settings\Administrator\桌面\0df431ad588b9f9a4b36d69c.bmp”, )

page2.置顶点关键色 ()

时钟1.时钟周期 ＝ 10

时钟2.时钟周期 ＝ 250

.子程序 _时钟1_周期事件

page.填充页面 (#天蓝)

page.写文字 (240, 100, 255, “↑”)

page.写文字 (200, 150, 255, “←”)

page.写文字 (280, 150, 255, “→”)

page.写文字 (240, 200, 255, “↓”)

page.写文字 (232, 150, #绿色, “控制”)

page2.透空块复制 (page, 100, 100, 矩形)

屏幕.交换页面 (假, 假, 真)

.子程序 _时钟2_周期事件

a ＝ a ＋ 1

矩形.左边 ＝ (a － 1) × 64

矩形.右边 ＝ a × 64

矩形.顶边 ＝ 状态 × 100

矩形.底边 ＝ (状态 ＋ 1) × 100

.如果真 (a ＝ 4)

    a ＝ 0

.如果真结束

.子程序 __启动窗口_按下某键, 逻辑型

.参数 键代码, 整数型

.参数 功能键状态, 整数型

.判断开始 (键代码 ＝ 37)

    状态 ＝ 1

.判断 (键代码 ＝ 39)

    状态 ＝ 2

.判断 (键代码 ＝ 38)

    状态 ＝ 3

.判断 (键代码 ＝ 40)

    状态 ＝ 0

.默认

.判断结束

 E画板 方法 不支持透明(透明可用ICO)，不支持PNG图片=============================

.版本 2

.程序集 窗口程序集1

.程序集变量 图片, 整数型

.程序集变量 源图, 画板

.程序集变量 处理, 画板

.程序集变量 后台, 画板

.程序集变量 a, 整数型

.程序集变量 x, 整数型

.程序集变量 y, 整数型

.程序集变量 状态, 整数型

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

_启动窗口.宽度 ＝ 430

_启动窗口.高度 ＝ 360

图片 ＝ 载入图片 (“C:\Documents and Settings\Administrator\桌面\0df431ad588b9f9a4b36d69c.bmp”)  ' 支持 字节集！

画板1.自动重画 ＝ 真

画板1.画板背景色 ＝ 0

复制窗口组件 (画板1, 源图)

源图.自动重画 ＝ 真

画板1.移动 (0, 0, 取用户区宽度 (), 取用户区高度 ())

画板1.文本颜色 ＝ 255

画板1.定位写出 (240, 100, “↑”)

画板1.定位写出 (200, 150, “←”)

画板1.定位写出 (280, 150, “→”)

画板1.定位写出 (240, 200, “↓”)

画板1.文本颜色 ＝ #绿色

画板1.定位写出 (232, 150, “控制”)

源图.移动 (0, 0, 画板1.取图片宽度 (图片), 画板1.取图片高度 (图片))

源图.画图片 (图片, 0, 0, , , )

源图.复制 (0, 0, 64, 100, 画板1, 100, 100, )

时钟1.时钟周期 ＝ 10

时钟2.时钟周期 ＝ 250

.子程序 _时钟1_周期事件

源图.复制 (x, y, 64, 100, 画板1, 100, 100, )

.子程序 _时钟2_周期事件

a ＝ a ＋ 1

x ＝ (a － 1) × 64

y ＝ 状态 × 100

.如果真 (a ＝ 4)

    a ＝ 0

.如果真结束

.子程序 __启动窗口_按下某键, 逻辑型

.参数 键代码, 整数型

.参数 功能键状态, 整数型

.判断开始 (键代码 ＝ 37)

    状态 ＝ 1

.判断 (键代码 ＝ 39)

    状态 ＝ 2

.判断 (键代码 ＝ 38)

    状态 ＝ 3

.判断 (键代码 ＝ 40)

    状态 ＝ 0

.默认

.判断结束

Answer 2

http://zhidao.baidu.com/question/394993952.html

追问

求代码,那个我看不懂的

Answer 3

下载地址:pan.baidu.com/s/1gdF1OVT
需要调用精易模块,百度下一个便可 找不到追问。可以实现把图片分割成4x4，你可以参考一下源码.不懂可以再问。

Answer 4

接触过易语言，但是图片处理没有做过，你去易语言论坛问问吧。