none
关于在VB 6中实现图片格式转换以及控制图片大小、分辨率及颜色问题 RRS feed

  • 问题

  • 请教各位达人:

    我希望实现以下目的:

    将剪贴板中的图片(并非一定是BMP格式),通过编程方式转换为TIF格式(一定),并要求能够控制其中图片分辨率(DPI)和颜色模式(或CMYK 32位,或灰阶8位),如何实现?

    我采用IMGEDIT控件时,代码如下:

    '窗体上一个按钮,一个imgedit控件
    Private Sub Command1_Click()
        With ImgEdit1
            If (.IsClipboardDataAvailable And .ImageDisplayed) Then
                '从剪贴板粘贴图象,其参数为Imgedit的显示区域的起始坐标
                .ClipboardPaste 0, 0
                .CompletePaste
                .ImageResolutionX = 300
                .ImageResolutionY = 300
            End If
            '保存图片为TIFF格式
            ImgEdit1.SaveAs "d:\temp\mytest.tif", wiFileTypeTIFF, 7
        End With
    End Sub

    发现无法更改图片的分辨率,上述代码中,拟将DPI设置为300,但实际上的图片仍为72DPI,另外,imgEdit控件似乎只有24位色彩控制的参数,而无32位色彩的控制参数?

    另一种方法据说可以通过GDI+来实现,但才疏学浅,未能找到合适的示例代码。

    请大家帮助一下,谢谢!

    2008年10月30日 1:15
    版主

全部回复