论坛 › 『 提问交流 』 › 关于二维数组赋值问题？

blue_dvd 发表于 2012-11-6 09:23:02

关于二维数组赋值问题？

二维数组可以用图像来赋值吗？然后显示出来！按每行5张图片显示可以吗？
Local $array
For $i=1 to 15
$array[$i-1]=图像文件
Next
_Arraydisplay($array)

netegg 发表于 2012-11-6 11:48:33

把图像转成编码，显示的时候转回图像

xiehuahere 发表于 2012-11-6 12:25:27

图像转为二进制字符串：
Local $pic, $file
$pic = FileOpenDialog("打开", "", "图像文件(*.bmp;*.jpg;*.jpeg;*.ico;*.png;*.gif)", 1)
If @error Then
      MsgBox(4096, "", "没有选择文件!")
      Exit
EndIf
$file = FileOpen($pic, 0+16) ;二进制读模式
If $file = -1 Then
    MsgBox(0, "错误", "无法打开文件.")
    Exit
EndIf
ClipPut(FileRead($file))
FileClose($file)
MsgBox(0, "", "图片二进制数据已放入剪贴板")

参见：图片资源以二进制形式放入Au3代码的使用方法

blue_dvd 发表于 2012-11-11 21:23:41

回复 3# xiehuahere
非常感谢解答，测试代码不错，有解释看的明白！
不过能否把图片再显示在ListView上？

lxwlxwayy 发表于 2012-11-12 08:22:22

会不会很占内存阿

xiehuahere 发表于 2012-11-12 10:41:07

回复 4# blue_dvd

图片再显示，参见3#下面给出的链接里介绍的方法，从内存中读出图像。

其实要简单的话，二维数组就用图像路径字符串来赋值就行了。

查看完整版本: 关于二维数组赋值问题？