求一种可以取一张图的部分的代码

洛天

用http读文件获取图片，然后这个图片不加载到图片框，然后再裁剪，比如顶边是9，左边是9，高度是8，宽度是8，然后再无损放大裁剪的图片（无损放大意思就是让原本一个像素1*1变为n*n，在n*n内的范围内都是放大前同种颜色）

永卜言弃

占个位,看看固定像素.无损放大看哪个大神会.

洛天

永卜言弃 发表于 2017-8-20 17:41
占个位,看看固定像素.无损放大看哪个大神会.

无损放大我自己做到了，你要看代码吗

洛天

无损放大很简单

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口

子程序名	返回值类型	公开	备 注
_按钮1_被单击

变量名	类 型	静态	数组	备 注
原图	位图
改图	位图
颜色	整数型
n1	整数型			倍
n2	整数型			倍
x	整数型			x位置
y	整数型			y位置
x2	整数型
y2	整数型
改图x	整数型
改图y	整数型

原图.载入文件 (“C:\Users\孙利宾\Desktop\孙天钰\101.bmp”)
n1 ＝ 到整数 (编辑框1.内容)
n2 ＝ 到整数 (编辑框2.内容)
x ＝ 0
y ＝ 0
x2 ＝ 0 － n1
y2 ＝ 0
改图x ＝ 原图.取宽度 () × n1
改图y ＝ 原图.取高度 () × n2
调试输出 (改图x)
调试输出 (改图y)
改图.创建 (改图x, 改图y, 24, #白色 )
判断循环首 (x ≤ 原图.取宽度 ())
x2 ＝ x2 ＋ n1
判断循环首 (y ≤ 原图.取高度 ())
颜色 ＝ 原图.取某点颜色 (x, y)
计次循环首 (n2, )
计次循环首 (n1, )
改图.置某点颜色 (x2, y2, 颜色)
x2 ＝ x2 ＋ 1
计次循环尾 ()
x2 ＝ x2 － n1
y2 ＝ y2 ＋ 1
计次循环尾 ()
y ＝ y ＋ 1
判断循环尾 ()
y2 ＝ 0
x ＝ x ＋ 1
y ＝ 0
判断循环尾 ()
图片框2.图片 ＝ 改图.取位图数据 ()
写到文件 (“C:\Users\孙利宾\Desktop\1.png”, 图片框2.图片)

i支持库列表	支持库注释
BmpOperate	位图操作支持库
spec	特殊功能支持库

.版本 2<br /> .支持库 BmpOperate<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> <br /> .子程序 _按钮1_被单击<br /> .局部变量 原图, 位图<br /> .局部变量 改图, 位图<br /> .局部变量 颜色, 整数型<br /> .局部变量 n1, 整数型, , , 倍<br /> .局部变量 n2, 整数型, , , 倍<br /> .局部变量 x, 整数型, , , x位置<br /> .局部变量 y, 整数型, , , y位置<br /> .局部变量 x2, 整数型<br /> .局部变量 y2, 整数型<br /> .局部变量 改图x, 整数型<br /> .局部变量 改图y, 整数型<br /> <br /> 原图.载入文件 (“C:\Users\孙利宾\Desktop\孙天钰\101.bmp”)<br /> n1 ＝ 到整数 (编辑框1.内容)<br /> n2 ＝ 到整数 (编辑框2.内容)<br /> x ＝ 0<br /> y ＝ 0<br /> x2 ＝ 0 － n1<br /> y2 ＝ 0<br /> 改图x ＝ 原图.取宽度 () × n1<br /> 改图y ＝ 原图.取高度 () × n2<br /> 调试输出 (改图x)<br /> 调试输出 (改图y)<br /> 改图.创建 (改图x, 改图y, 24, #白色)<br /> <br /> .判断循环首 (x ≤ 原图.取宽度 ())<br />     x2 ＝ x2 ＋ n1<br />     .判断循环首 (y ≤ 原图.取高度 ())<br />         颜色 ＝ 原图.取某点颜色 (x, y)<br />         .计次循环首 (n2, )<br />             .计次循环首 (n1, )<br />                 改图.置某点颜色 (x2, y2, 颜色)<br />                 x2 ＝ x2 ＋ 1<br />             .计次循环尾 ()<br />             x2 ＝ x2 － n1<br />             y2 ＝ y2 ＋ 1<br />         .计次循环尾 ()<br />         y ＝ y ＋ 1<br />     .判断循环尾 ()<br />     y2 ＝ 0<br />     x ＝ x ＋ 1<br />     y ＝ 0<br /> .判断循环尾 ()<br /> 图片框2.图片 ＝ 改图.取位图数据 ()<br /> 写到文件 (“C:\Users\孙利宾\Desktop\1.png”, 图片框2.图片)

补充内容 (2017-8-23 13:18):
n1是x轴放大的倍数，n2是y轴放大的位置

永卜言弃

hatsunemiku

读到图片框再裁剪不就简单多了吗..

洛天

hatsunemiku 发表于 2017-8-23 07:08
读到图片框再裁剪不就简单多了吗..

我写的代码是裁剪的吗，我分明写的是无损放大的。裁剪就用位图支持库的
位图.复制到（）就行了

hatsunemiku

洛天 发表于 2017-8-23 13:16
我写的代码是裁剪的吗，我分明写的是无损放大的。裁剪就用位图支持库的
位图.复制到（）就行了

笑死了,你自己不是问怎么裁剪图片?你在逗我

洛天

hatsunemiku 发表于 2017-8-24 00:11
笑死了,你自己不是问怎么裁剪图片?你在逗我

我已经会了并且在取消悬赏帖子发了，为什么要问你

洛天

hatsunemiku 发表于 2017-8-23 07:08
读到图片框再裁剪不就简单多了吗..

不看帖子中全部内容就回答？没看见3l吗