Recuperer un fond d'ecran

pearl240582 Messages postés 8 Date d'inscription jeudi 9 janvier 2003 Statut Membre Dernière intervention 9 février 2004 - 24 mars 2003 à 13:42
yrhkoon Messages postés 6 Date d'inscription jeudi 11 mars 2004 Statut Membre Dernière intervention 14 septembre 2005 - 9 avril 2004 à 16:18
bijour, j'aimerai pouvoir stocker dans une form par exemple
le fond d'écran actuellement affiché sur le bureau...
Si vous pouvez m'éclairer...

2 réponses

clementio Messages postés 432 Date d'inscription samedi 18 mai 2002 Statut Membre Dernière intervention 17 février 2014 1
24 mars 2003 à 14:15
Salut,

Je pense que ce bout de code pourrait te venir en aide:

Private Declare Function PaintDesktop Lib "user32" (ByVal hdc As Long) As Long

Private Sub Command1_Click()
PaintDesktop Me.hdc
End Sub

A+,

Clm
0
yrhkoon Messages postés 6 Date d'inscription jeudi 11 mars 2004 Statut Membre Dernière intervention 14 septembre 2005
9 avril 2004 à 16:18
J'ai eu le même problème. Ca marche effectivement, mais pas avec Autoredraw à True, ce qui perd sérieusement de son intéret. Quelqu'un a-t-il la solution ?

Yrhkoon
0
Rejoignez-nous