please follow this to the original post
Sorry for the inconvience ,
[]P
Printable View
please follow this to the original post
Sorry for the inconvience ,
[]P
i dont know for sure ..but maybe you can simply load a picture into
image1
setting the strech property to true
than simply minimizing the image..
i know this sounds just too easy ...but maybe it will work..
although , i'm sure there are several API functions which does the job perfectly..(i dont know what are they..)
I Need to shrink it .
:)
Code:Picture1.PaintPicture Picture2.Image, 0, 0, 16, 16, 0, 0, 32, 32, vbSrcCopy
Thanks kedaman !
maybe I'm asking wrong I used the API's to get the icon into the first box Then I tried your code here
pic_little has autoredraw set to true but still fails to display the icon . What did I do wrong ?Code:retval = DrawIcon(pixDummy.hDC, 0, 0, hIcon)
' Although the icon's image is still visible, the icon itself is not in use.
' Therefore we destroy it to free up resources.
retval = DestroyIcon(hIcon)
pixDummy.PaintPicture pic_Little.Image, 0, 0, 16, 16, 0, 0, 32, 32, vbSrcCopy
pic_Little.Refresh
[]P
[Edited by PRIVATE1 on 11-11-2000 at 10:45 AM]
I Got it I confused the source and destination .
thanks again