[Jeu] Aidez ma chenille à trouver son cadeau

**Arkham46** · 23/12/2010, 10h00

Bonjour à tous,

C'est bientôt Noël, ma chenille aimerait bien trouver son cadeau!
Pouvez-vous l'aider?

Version Access (Mirroir HTTP)
Version Excel (Mirroir HTTP)
Version Word (Mirroir HTTP)

Mon record : 19 déplacements.

Bonnes fêtes!

**Heureux-oli** · 26/12/2010, 17h09

Salut Arkham,

J'ai un problème sur Word.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
TransparentBlt

Là

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Private Function PrivDrawBitmap(pDIB As tDIB, ByVal pX1 As Long, ByVal pY1 As Long, Optional ByVal pX2 As Long = cLongOptional, Optional ByVal pY2 As Long = cLongOptional, Optional pTranspColor As Long = -1, _
                                Optional pImgSizeMode As EGdi32ImgSizeMode = Gdi32SizeModeZoom, Optional pImgPictureAlignment As EGdi32ImgPictureAlignment = 2, Optional pPercent As Integer = 255, Optional pAntialiase As Boolean = False, Optional pRegion As String, Optional pImage As String = "", Optional pRegionColor As Long = -1) As Boolean

Win 7 Office 2010

**Arkham46** · 26/12/2010, 17h59

Envoyé par Heureux-oli

Salut Arkham,

J'ai un problème sur Word.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
TransparentBlt

Win 7 Office 2010

version 64 bits?

tu peux commenter la ligne avec TransparentBlt et décommenter celle du dessus

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
 
            ' Copie l'image sans couleur de fond
            BitBlt lDib.hdc, pX1, pY1, lWidth, lHeight, lHdcMem, lWrapX, lWrapY, SRCCOPY
            'TransparentBlt lDib.hdc, pX1, pY1, lWidth, lHeight, pDIB.hdc, lWrapX, lWrapY, pDIB.Width, pDIB.Height, pTranspColor

J'ai voulu essayer cette API pour me facilité la vie, mais je crois que je vais revenir en arrière.