avi$
avi
05/18/2007 :: 23:46

Anonyme

Hello,

In my previous posting, i want the watermark image to be semi-transparent and not completely transparent

Thanks a lot
Avi
Loïc$2006306
Loïc
05/19/2007 :: 16:29

Registered

Hi,

You can do like that to draw image1.jpg to image2.jpg with semi transparency:

Dim oGdPicture As New GdpicturePro.cGdPicture
Dim nImageID1 As Long, nImageID2 As Long

oGdPicture.SetLicenceNumber ("0012345678910111213141516") 'Demo code version


nARGBWhiteColor = oGdPicture.ARGB(255, 255, 255, 255)
nImageID1 = oGdPicture.CreateImageFromFile("image1.jpg")
oGdPicture.SetTransparencyEffect (-125)
nImageID2 = oGdPicture.CreateImageFromFile("image2.jpg")

oGdPicture.SetNativeImage (nImageID2)
Call oGdPicture.DrawImage(nImageID1, 1, 1, 100, 100)

oGdPicture.SaveAsJpeg ("merged.jpg")
Call oGdPicture.CloseImage(nImageID1)
Call oGdPicture.CloseImage(nImageID2)

Set oGdPicture = Nothing

Best regards,

Loïc Carrère
back to forum