VB - Put the desktops background as forms background

VB Code:

Private Declare Function PaintDesktop Lib "USER32" (ByVal HDC As Long) As Long
 
Private Sub Command1_Click()
 PaintDesktop Me.HDC
End Sub

On my NT machine the picture paints and then goes away.

Yeah, I have noidea why it does that. :confused:

Thats pretty cool though, its like X-Ray vision. :p

I haven't been able to find the NT version of that code. It does work on: win95, 98, xp however.

However it does work on my WinNT computer.
VB version in that machine is 5.

Works fine on my NT machine, and my 2k machine.

Interesting. It works on my work NT PC. :confused:

maybe you should try setting the "autoredraw" property of the form to true

How can you prevent the form from clearing when it disappears?

Obviously without putting that code in the resize event ;)

I thnk thats what Martin is on about.

If you set autoredraw to true, on XP atleast, it doesn't do anything at all.

It appears that it depends on the type of picture. For example on my home NT machine if I choose the "Seaside 16" and "Zapotec 16" backgrounds the code in this sample works, but if I choose type of picture. For example on my home NT machine if I choose the "Seaside" and "Zapotec" it doesn't. Does that mean that it only works with 16-bit pictures?