| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 674 人关注过本帖
标题:怎么实现图象的拼接
只看楼主 加入收藏
ldd2w
Rank: 1
等 级:新手上路
帖 子:67
专家分:0
注 册:2006-1-4
收藏
 问题点数:0 回复次数:8 
怎么实现图象的拼接
我把大图分成3*3的小图后,怎么根据小图的坐标进行拼接?
或者实现我需要哪副图就调进哪副图
搜索更多相关主题的帖子: 拼接 图象 
2006-01-13 09:19
moshen62
Rank: 1
等 级:新手上路
帖 子:72
专家分:0
注 册:2006-1-12
收藏
得分:0 
上传一个样图来看看

2006-01-13 09:34
ldd2w
Rank: 1
等 级:新手上路
帖 子:67
专家分:0
注 册:2006-1-4
收藏
得分:0 
我的所有小图都一样大小
2006-01-13 11:39
ldd2w
Rank: 1
等 级:新手上路
帖 子:67
专家分:0
注 册:2006-1-4
收藏
得分:0 

我不知道怎么把图片传上来
就是把一副图片分割成M*N

2006-01-13 11:42
moshen62
Rank: 1
等 级:新手上路
帖 子:72
专家分:0
注 册:2006-1-12
收藏
得分:0 

我的意思是 把你的图上传上来才能知道怎么连接阿


2006-01-13 11:42
leon2
Rank: 3Rank: 3
等 级:新手上路
威 望:7
帖 子:731
专家分:0
注 册:2005-3-18
收藏
得分:0 

你自己已经把大图分割成一个个小图了吧?
你可以定义一个类型:


Private Type PictureCoor '图片坐标
x As Long 'X 坐标
y As Long 'Y 坐标
End Type

然后定义一个 PictureCoor 类型的数组,用来存放小图的坐标信息:
Public SmallPics() As PictureCoor

最后使用循环,调整一个个小图的位置(这里假设你已经把每个小图分别装进了一个 Picture 控件数组的每个 Picture 控件里):

Dim i As Integer
For i = 0 To UBound(SmallPics)
Picture1(i).Left = SmallPics(i).X
Picture1(i).Top = SmallPics(i).Y
Next

2006-01-13 12:45
ldd2w
Rank: 1
等 级:新手上路
帖 子:67
专家分:0
注 册:2006-1-4
收藏
得分:0 

我怎么把小图分别装进了一个 Picture 控件数组的每个 Picture 控件里?
不好意思
我很弱
我把小图坐标是写到一个文件里

2006-01-13 13:56
leon2
Rank: 3Rank: 3
等 级:新手上路
威 望:7
帖 子:731
专家分:0
注 册:2005-3-18
收藏
得分:0 

存储的格式是怎么样的?

2006-01-13 14:36
ldd2w
Rank: 1
等 级:新手上路
帖 子:67
专家分:0
注 册:2006-1-4
收藏
得分:0 
谢谢leon2!
2006-01-17 10:05
快速回复:怎么实现图象的拼接
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.016539 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved