|
|
我主要是想把一个图片文件存成数组之后显示出来
Dim BR As New IO.BinaryReader(IO.File.OpenRead(Application.StartupPath + "\rc\a.bmp"))
Dim v() As Byte
ReDim v(BR.BaseStream.Length)
v = BR.ReadBytes(BR.BaseStream.Length)
Dim Ptream As New MemoryStream(v)
我开始是想把这个Ptream用TextureLoader.FromStream读进来.可是报错.我把代码写在下面了.
dim M_Pic As Direct3D.Texture = Nothing
Dim ii As ImageInformation
ii = TextureLoader.ImageInformationFromStream(Ptream)
M_Width = ii.Width
M_Height = ii.Height
M_Pic = TextureLoader.FromStream(driver, Ptream, M_Width, M_Height, 1, Usage.None, Format.Unknown, Pool.Managed, Filter.None, Filter.None, cKey)
我不知道我的这种想法能不能实现,请告诉高手帮忙指点我一下.
|
|