如题。
解决方案 »
- VB6.0调用ActivexDLL出错,求帮忙找下原因
- vb 接收到下位机数据后解析的问题
- 问一个API函数的格式问题,也就是MSDN中
- 编写浏览器的问题
- inet控件问题 急死了 急死了
- 哪位朋友能给个中文版的vb的msdn的下载地址,自己没找着:)
- 求华表控件和注册码,Thanks
- 一个VB和Excel相关的超难问题
- 关机问题!!!
- 我在一台电脑上装了W2Kserver又装了sql7,到另一win98上ping到w2k,但不能用ODBC登陆到sql
- 新手问题:小弟刚刚开始学用VB写一些简单的组件,请教是否有一种简单点的 调试方法可以调试DLL?现在我大部分时间都浪费在注册组件和重器IIS
- 如何获得outlook 里面接受的新邮件的标题和内容!
http://www.aivisoft.net/Documents/TGAFormat.htm
能留下您的qq吗?
有保存的代码,数据在BmpStream里面,Alpha数据在BmpStream(4、8、12、16……)里面
每一点的数据用四个字节表示,比如左下角这一点,就是BmpStream(0 to 3)表示的
0表示Blue通道,1表示Green通道,2表示Red通道,3表示Alpha通道,依次类推,左下角右边一点应该是BmpStream(4 to 7).......
可是图形是不规则得
没有固定Width啊?
能留个qq吗?
我还是不太理解???
我在编程时只是读取此值,Alpha是0的象素自动设置为透明呢?
FileNum = FreeFile
Open FileName For Binary As #FileNum
Get #FileNum, 1, .taID_Length '载入文件头的TGA图像信息偏移量
Get #FileNum, 2, .taPalType '调色板类型
Get #FileNum, 3, .taImageType '图像类型
Get #FileNum, 4, .taPalFirstNdx '调色板索引
Get #FileNum, 6, .taPalLength '调色板长度
Get #FileNum, 8, .taPalBits '调色板颜色数
Get #FileNum, 9, .taLeft
Get #FileNum, 11, .taBottom
Get #FileNum, 13, .taWidth '宽度
TgaWidth = .taWidth
Get #FileNum, 15, .taHeight '高度
TgaHeight = .taHeight
Get #FileNum, 17, .taBits '图象颜色数
Get #FileNum, 18, TgaDescriptor
.taReserved = (TgaDescriptor And &HC0) \ &H40 '(&HC0 = 1100 0000, &H40 = 100 0000)
'保留量,默认为0
.taVerMirror = (TgaDescriptor And &H20) \ &H20 '(&H20 = 10 0000)
'是否上下翻转
.taHorMirror = (TgaDescriptor And &H10) \ &H10 '(&H10 = 1 0000)
'是否左右翻转
.taAlphaBits = TgaDescriptor And &HF '(&HF = 1111)
'是否有Alpha通道
EncodingLength = FileLength - 18 - .taID_Length '图像信息编码长度
ReDim TgaStream(EncodingLength)
Get #FileNum, .taID_Length + 19, TgaStream '取得图像信息
Close #FileNum
End With这段代码我不太理解TgaHeaderInfo中没有TgaDescriptor啊
这里面有Alpha通道信息的内容吗?如果有是哪个?Geo_Cra(无铭人氏) ,谢谢你这两天帖子上耐心的帮助。
这个标志是什么表示有,是什么表示没有
有什么VB的书介绍这方面内容
可是现在对我来说的问题是
如何在VB中实现
程序里的是第二个类型吧
我真的很渴望能直接和你们交流请教
能否留个qq或邮箱呢???