1,451
社区成员
发帖
与我相关
我的任务
分享如何将两个TIF文件合并为一个？（VB）
我以前用 Kodak 的控件，来合并两个TIF文件！
用 ImgAdmin.Insert 合并后，某些页会变为“反色”（就是“白底黑字”变成“黑底白字”）
（随机的，有时候会有时候不会）
现在就教用另一种方法合并两个TIF文件！
用 ImgAdmin.Insert 合并后，某些页会变为“反色”（就是“白底黑字”变成“黑底白字”）
（随机的，有时候会有时候不会）
现在就教用另一种方法合并两个TIF文件！
...全文
请发表友善的回复…
发表回复
Gutta 2006-01-16
- 打赏
- 举报
暴老大的功力果然是。。。
不说了
不说了
脆皮大雪糕 2006-01-11
- 打赏
- 举报
单单一个灰度图就有三四种压缩方案，如果支持所有格式成本很高
rainstormmaster 2006-01-11
- 打赏
- 举报
//tif内部支持的格式和压缩算法太多太复杂了，自己写代码解决比较困难
是这样,不过写完之后,你会有很多收获
是这样,不过写完之后,你会有很多收获
脆皮大雪糕 2006-01-11
- 打赏
- 举报
tif内部支持的格式和压缩算法太多太复杂了，自己写代码解决比较困难，还是用第三方的东东比较经济
脆皮大雪糕 2006-01-11
- 打赏
- 举报
我用ImgAdmin没发生过反色的问题
lifat 2006-01-11
- 打赏
- 举报
说错了啊!!!最后一句是这样子!!
现在请教用另一种方法合并两个TIF文件！?请教,,(<--这是一个提问)
现在请教用另一种方法合并两个TIF文件！?请教,,(<--这是一个提问)
rainstormmaster 2006-01-11
- 打赏
- 举报
//哪种方式？楼主是要发布代码么？
呵呵,应该是这样的:
ImgAdmin1.Image = App.Path & sfilename
f1 = ImgAdmin1.Image
ImgAdmin1.Image = App.Path & imagefile
f2 = ImgAdmin1.Image
ImgAdmin1.Image = f1
ImgAdmin1.Insert f2, 1, page_num, 1
至于有时候翻转,我建议楼主检查一下,这种情况一般在什么时候发生
至于其它的方法,目前只想到了根据tif的文件格式写
呵呵,应该是这样的:
ImgAdmin1.Image = App.Path & sfilename
f1 = ImgAdmin1.Image
ImgAdmin1.Image = App.Path & imagefile
f2 = ImgAdmin1.Image
ImgAdmin1.Image = f1
ImgAdmin1.Insert f2, 1, page_num, 1
至于有时候翻转,我建议楼主检查一下,这种情况一般在什么时候发生
至于其它的方法,目前只想到了根据tif的文件格式写
IamDeane 2006-01-11
- 打赏
- 举报
哪种方式？楼主是要发布代码么？
可是没有什么实际内容啊？
可是没有什么实际内容啊？
