设为首页收藏本站|繁體中文

Project1

 找回密码
 注册会员
搜索
查看: 7871|回复: 23
打印 上一主题 下一主题

[有事请教] 请教一个vb的问题Orz(←模糊标题自重)

[复制链接]

Lv1.梦旅人

梦石
0
星屑
50
在线时间
23 小时
注册时间
2011-8-15
帖子
44
跳转到指定楼层
1
发表于 2011-11-1 16:10:08 手机端发表。 | 只看该作者 回帖奖励 |倒序浏览 |阅读模式
5星屑
某字节数组变量储存的是一张图片以二进制读出的数据,有没有办法可以直接将这个字节数组转为stdpicture型啊囧。
存为文件再loadpicture太慢了。

最佳答案

查看完整内容

= =没人告诉你VB6的WinSock会丢包么?

Lv2.观梦者

傻♂逼

梦石
0
星屑
369
在线时间
1605 小时
注册时间
2007-3-13
帖子
6562

烫烫烫开拓者

2
发表于 2011-11-1 16:10:09 | 只看该作者
= =没人告诉你VB6的WinSock会丢包么?

点评

CopyMemory szfile(p), buff(0), UBound(buff()) 大概这样的?很久没用VB了……但是素组什么的是从0开始吧?  发表于 2011-11-2 19:44
buff从0开始吧?  发表于 2011-11-2 19:42
PS不是重点  发表于 2011-11-2 19:40
哎呀,蛋疼什么的最有爱了
回复

使用道具 举报

Lv1.梦旅人

梦石
0
星屑
100
在线时间
5250 小时
注册时间
2011-10-7
帖子
1885

开拓者贵宾

3
发表于 2011-11-1 16:23:59 | 只看该作者
喵~~~表示vb无能…
不过我找了份资料给你:读出图片文件到byte数组,然后再得到stdpicture(http://blog.csdn.net/dengyu1997/article/details/617491)
手机不方便给你复制过来,只好给你传送门了……
回复

使用道具 举报

Lv1.梦旅人

梦石
0
星屑
50
在线时间
23 小时
注册时间
2011-8-15
帖子
44
4
 楼主| 发表于 2011-11-1 18:01:42 手机端发表。 | 只看该作者
凌童鞋 发表于 2011-11-1 16:23 喵~~~表示vb无能… 不过我找了份资料给你:读出图片文件到byte数组,然后再得到stdpicture(http://blog.csd ...

很感谢,但没看懂,继续求详解。
0v0
回复

使用道具 举报

Lv1.梦旅人

梦石
0
星屑
72
在线时间
673 小时
注册时间
2006-10-3
帖子
1795

开拓者

5
发表于 2011-11-1 18:51:57 | 只看该作者
把数组弄到MemoryStream
然后用方法PictureBox.Image.FromStream
这个可以实现你的要求吧?


熊猫于2011-11-1 18:52补充以下内容:
你用的是.NET吧?


熊猫于2011-11-1 19:11补充以下内容:
        Dim imgPath As String = "E:\20111031200811.jpg"
        Dim imgSize As Long = FileLen(imgPath)
        Dim Bin() As Byte = Nothing
        GetBinX(imgPath, Bin, imgSize, 1)
        Dim IMG As New System.IO.MemoryStream(Bin)
        PictureBox1.Image = Image.FromStream(IMG)
我的代码,成功从数组载入了图片。这个数组我是现读的,这个你不用在乎。
( ส็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็ ω ส้้้้้้้้้้้้้้้้้้้้้้้้้้้้้้้้้้้้้้้้้้้้้【看猫君玩,我也搞一只】)
回复

使用道具 举报

Lv2.观梦者

傻♂逼

梦石
0
星屑
369
在线时间
1605 小时
注册时间
2007-3-13
帖子
6562

烫烫烫开拓者

6
发表于 2011-11-1 19:13:50 | 只看该作者
小黄鸡 发表于 2011-11-1 18:01
很感谢,但没看懂,继续求详解。

把他给你的这段代码复制到VB,然后PictureFromRes(Byte数组)就可以了= = 话说小黄鸡在做什么啊?远程监控?
哎呀,蛋疼什么的最有爱了
回复

使用道具 举报

Lv1.梦旅人

梦石
0
星屑
50
在线时间
23 小时
注册时间
2011-8-15
帖子
44
7
 楼主| 发表于 2011-11-1 21:06:56 | 只看该作者
yangff 发表于 2011-11-1 19:13
把他给你的这段代码复制到VB,然后PictureFromRes(Byte数组)就可以了= = 话说小黄鸡在做什么啊?远程监 ...

就是这样= =
手机上看的时候没排版,看不懂= =


小黄鸡于2011-11-1 21:07补充以下内容:
我要获取一个stdpicture的句柄= =
0v0
回复

使用道具 举报

Lv5.捕梦者 (管理员)

老黄鸡

梦石
0
星屑
39855
在线时间
7493 小时
注册时间
2009-7-6
帖子
13485

开拓者贵宾

8
发表于 2011-11-2 09:58:03 | 只看该作者
熊猫 发表于 2011-11-1 18:51
把数组弄到MemoryStream
然后用方法PictureBox.Image.FromStream
这个可以实现你的要求吧?

内啥,这个不可以,我要获取一个stdpicture的句柄。现在自己解决了。
于是求vb字节数组组合的方法,就像ruby的arr1+arr2一样。
[1,2,3]+[2,3,4] = [1,2,3,2,3,4]
RGDirect - DirectX驱动的RGSS,点我了解.
RM全系列成套系统定制请联系QQ1213237796
不接受对其他插件维护的委托
回复

使用道具 举报

Lv1.梦旅人

梦石
0
星屑
72
在线时间
673 小时
注册时间
2006-10-3
帖子
1795

开拓者

9
发表于 2011-11-2 10:57:25 | 只看该作者
fux2 发表于 2011-11-2 09:58
内啥,这个不可以,我要获取一个stdpicture的句柄。现在自己解决了。
于是求vb字节数组组合的方法,就像ru ...

        Dim arr1() As Integer = {1, 2, 3}
        Dim arr2() As Integer = {2, 3, 4}
        Dim list As New List(Of Integer)
        list.AddRange(arr1)
        list.AddRange(arr2)
        Dim new_arr() As Integer = list.ToArray
用链表。

点评

非常感谢熊猫君帮忙,答案认可yangff了,贴外奉上5V。  发表于 2011-11-2 20:14
( ส็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็็ ω ส้้้้้้้้้้้้้้้้้้้้้้้้้้้้้้้้้้้้้้้้้้้้้【看猫君玩,我也搞一只】)
回复

使用道具 举报

Lv3.寻梦者

梦石
0
星屑
1262
在线时间
670 小时
注册时间
2009-11-11
帖子
2790
10
发表于 2011-11-2 12:09:35 | 只看该作者
直接读取 二XX图象就可以了吧,咱也不懂 标记下

嘿。嘿。嘿
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册会员

本版积分规则

拿上你的纸笔,建造一个属于你的梦想世界,加入吧。
 注册会员
找回密码

站长信箱:[email protected]|手机版|小黑屋|无图版|Project1游戏制作

GMT+8, 2024-5-11 23:27

Powered by Discuz! X3.1

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表