Textbox transparent, mais sans office...

math_gury Messages postés 32 Date d'inscription vendredi 4 novembre 2005 Statut Membre Dernière intervention 8 juin 2009 - 15 mars 2006 à 10:21
BasicInstinct Messages postés 1470 Date d'inscription mardi 5 février 2002 Statut Membre Dernière intervention 20 octobre 2014 - 15 mars 2006 à 12:09
Bonjour,
J'ai developper une application en VB6 qui fonctionne très bien. Dans cette applicaiton j'utilise "microsoft Forms 2.0 Object Library" donc "fm20.dll", seulement, je l'instal desormé sur le PC concerner équiper de windows XP embedded, et il n'y a pas de version d'office... est ce qu'il existe un moyen d'avoir des textbox transparantes sans utiliser ce composant?
Merci...

3 réponses

BasicInstinct Messages postés 1470 Date d'inscription mardi 5 février 2002 Statut Membre Dernière intervention 20 octobre 2014 12
15 mars 2006 à 10:42
Salut,

'dans un module
Public Const WS_EX_TRANSPARENT = &H20&
Public Const GWL_EXSTYLE As Long = -20 ' Sets a new extended window style
Public Const GWL_STYLE As Long = -16 ' Sets a new window style

Public Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" ( _
ByVal hWnd As Long, _
ByVal nIndex As Long, _
ByVal dwNewLong As Long) As Long

dans le form_load :

Text1.ZOrder 0
DoEvents
SetWindowLong Text1.hWnd, GWL_EXSTYLE, WS_EX_TRANSPARENT

++

BasicInstinct
0
math_gury Messages postés 32 Date d'inscription vendredi 4 novembre 2005 Statut Membre Dernière intervention 8 juin 2009
15 mars 2006 à 10:55
je sais pas si je l'utilise mal, mais le textbox ce trouve dans une picture box, et l'image de cette picturebox est toujours "grignoter" par le contour du textbox...
0
BasicInstinct Messages postés 1470 Date d'inscription mardi 5 février 2002 Statut Membre Dernière intervention 20 octobre 2014 12
15 mars 2006 à 12:09
je peux pas t'aider. Perso, ma textbox multiligne est plus grande que le fond a mettre en transparent (un label pour moi).

BasicInstinct
0
Rejoignez-nous