CopyImage

CopyImage

VB声明

Declare Function CopyImage Lib "user32" Alias "CopyImage" (ByVal handle As Long, ByVal un1 As Long, ByVal n1 As Long, ByVal n2 As Long, ByVal un2 As Long) As Long

说明

复制位图、图标或指针，同时在复制过程中进行一些转换工作

返回值

Long，执行成功则返回新图象的句柄，零表示失败。会设置GetLastError

参数表

参数

类型及说明

handle

Long，欲复制的图象的句柄

un1

Long，下述常数之一：MAGE_BITMAP， IMAGE_CURSOR 或 IMAGE_ICON

n1

Long，副本以像素表示的宽度

n2

Long，副本以像素表示的高度

un2

Long，下述常数任意组合：

LR_DELETEORG

删除原来的图象

LR_COPYRETURNORG

忽略n1和n2设置

LR_MONOCHROME

创建一个单色副本

LR_COPYFROMRESOURCE

在原始资源的基础上创建一个副本，原始图象即是从那个资源中载入的。假设我们想为一个32×32的图标制作一个64×64的副本。如果不设这个标志，CopyImage会直接放大原来的图标。而使用这个标志后，CopyImage首先检查资源文件中是否存在这个图标的一个64×64版本，如果存在，就直接载入品质更好的图象

注解

这个函数通常在希望复制已选入其他设备场景的一幅位图时使用——例如，复制已成为ImageList控件一部分的某幅位图。选定的位图将不能使用，因为一次只能将位图选入一个设备场景

Top