je connais depuis peu ce groupe de discussion. J'y ai pourtant déjà
trouvé beaucoup d'aides et de conseils en fouillant dans les archives
du groupe sur Google.
J'ai trouvé un petit post sur la manière de rendre un formulaire
transparent. keepcool m'a gentiment aidé en me communiquant un lien
intéressant sur un code VB de Karl E. Peterson. Je l'en remercie.
J'ai adpaté ce code sous access et j'enverrais volontiers la base de
démo à ceux que ça intéresse.
Actuellement, ca fonctionne uniquement avec un formulaire modal. Et
bien entendu sous windows XP car je pense que 98 ne sait pas rendre la
transparence.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Raymond [mvp]
Bonjour.
je te remercie de me l'envoyer par mail (enlever XYZ. dans mon adresse)
-- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://OfficeSystem.Access.free.fr/runtime/ http://users.skynet.be/mpfa/ pour débuter sur le forum
a écrit dans le message de news:
Bonjour à tous,
je connais depuis peu ce groupe de discussion. J'y ai pourtant déjà trouvé beaucoup d'aides et de conseils en fouillant dans les archives du groupe sur Google.
J'ai trouvé un petit post sur la manière de rendre un formulaire transparent. keepcool m'a gentiment aidé en me communiquant un lien intéressant sur un code VB de Karl E. Peterson. Je l'en remercie.
J'ai adpaté ce code sous access et j'enverrais volontiers la base de démo à ceux que ça intéresse.
Actuellement, ca fonctionne uniquement avec un formulaire modal. Et bien entendu sous windows XP car je pense que 98 ne sait pas rendre la transparence.
Merci encore pour l'entraide.
Jean-louis.
Bonjour.
je te remercie de me l'envoyer par mail (enlever XYZ. dans mon adresse)
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum
<jeanlouis.delvaux@ping.be> a écrit dans le message de news:
fde62a7e.0502160633.24969316@posting.google.com...
Bonjour à tous,
je connais depuis peu ce groupe de discussion. J'y ai pourtant déjà
trouvé beaucoup d'aides et de conseils en fouillant dans les archives
du groupe sur Google.
J'ai trouvé un petit post sur la manière de rendre un formulaire
transparent. keepcool m'a gentiment aidé en me communiquant un lien
intéressant sur un code VB de Karl E. Peterson. Je l'en remercie.
J'ai adpaté ce code sous access et j'enverrais volontiers la base de
démo à ceux que ça intéresse.
Actuellement, ca fonctionne uniquement avec un formulaire modal. Et
bien entendu sous windows XP car je pense que 98 ne sait pas rendre la
transparence.
je te remercie de me l'envoyer par mail (enlever XYZ. dans mon adresse)
-- @+ Raymond Access MVP http://OfficeSystem.Access.free.fr/ http://OfficeSystem.Access.free.fr/runtime/ http://users.skynet.be/mpfa/ pour débuter sur le forum
a écrit dans le message de news:
Bonjour à tous,
je connais depuis peu ce groupe de discussion. J'y ai pourtant déjà trouvé beaucoup d'aides et de conseils en fouillant dans les archives du groupe sur Google.
J'ai trouvé un petit post sur la manière de rendre un formulaire transparent. keepcool m'a gentiment aidé en me communiquant un lien intéressant sur un code VB de Karl E. Peterson. Je l'en remercie.
J'ai adpaté ce code sous access et j'enverrais volontiers la base de démo à ceux que ça intéresse.
Actuellement, ca fonctionne uniquement avec un formulaire modal. Et bien entendu sous windows XP car je pense que 98 ne sait pas rendre la transparence.
Merci encore pour l'entraide.
Jean-louis.
Codial
a écrit dans le message de news:
Bonjour à tous,
je connais depuis peu ce groupe de discussion. J'y ai pourtant déjà trouvé beaucoup d'aides et de conseils en fouillant dans les archives du groupe sur Google.
J'ai trouvé un petit post sur la manière de rendre un formulaire transparent. keepcool m'a gentiment aidé en me communiquant un lien intéressant sur un code VB de Karl E. Peterson. Je l'en remercie.
J'ai adpaté ce code sous access et j'enverrais volontiers la base de démo à ceux que ça intéresse.
Actuellement, ca fonctionne uniquement avec un formulaire modal. Et bien entendu sous windows XP car je pense que 98 ne sait pas rendre la transparence.
Merci encore pour l'entraide.
Jean-louis.
<jeanlouis.delvaux@ping.be> a écrit dans le message de news:
fde62a7e.0502160633.24969316@posting.google.com...
Bonjour à tous,
je connais depuis peu ce groupe de discussion. J'y ai pourtant déjà
trouvé beaucoup d'aides et de conseils en fouillant dans les archives
du groupe sur Google.
J'ai trouvé un petit post sur la manière de rendre un formulaire
transparent. keepcool m'a gentiment aidé en me communiquant un lien
intéressant sur un code VB de Karl E. Peterson. Je l'en remercie.
J'ai adpaté ce code sous access et j'enverrais volontiers la base de
démo à ceux que ça intéresse.
Actuellement, ca fonctionne uniquement avec un formulaire modal. Et
bien entendu sous windows XP car je pense que 98 ne sait pas rendre la
transparence.
je connais depuis peu ce groupe de discussion. J'y ai pourtant déjà trouvé beaucoup d'aides et de conseils en fouillant dans les archives du groupe sur Google.
J'ai trouvé un petit post sur la manière de rendre un formulaire transparent. keepcool m'a gentiment aidé en me communiquant un lien intéressant sur un code VB de Karl E. Peterson. Je l'en remercie.
J'ai adpaté ce code sous access et j'enverrais volontiers la base de démo à ceux que ça intéresse.
Actuellement, ca fonctionne uniquement avec un formulaire modal. Et bien entendu sous windows XP car je pense que 98 ne sait pas rendre la transparence.
Merci encore pour l'entraide.
Jean-louis.
Codial
Bonjour,
je suis intéressé aussi
Merci
Codial
a écrit dans le message de news:
Bonjour à tous,
je connais depuis peu ce groupe de discussion. J'y ai pourtant déjà trouvé beaucoup d'aides et de conseils en fouillant dans les archives du groupe sur Google.
J'ai trouvé un petit post sur la manière de rendre un formulaire transparent. keepcool m'a gentiment aidé en me communiquant un lien intéressant sur un code VB de Karl E. Peterson. Je l'en remercie.
J'ai adpaté ce code sous access et j'enverrais volontiers la base de démo à ceux que ça intéresse.
Actuellement, ca fonctionne uniquement avec un formulaire modal. Et bien entendu sous windows XP car je pense que 98 ne sait pas rendre la transparence.
Merci encore pour l'entraide.
Jean-louis.
Bonjour,
je suis intéressé aussi
acodial@tiscali.fr
Merci
Codial
<jeanlouis.delvaux@ping.be> a écrit dans le message de news:
fde62a7e.0502160633.24969316@posting.google.com...
Bonjour à tous,
je connais depuis peu ce groupe de discussion. J'y ai pourtant déjà
trouvé beaucoup d'aides et de conseils en fouillant dans les archives
du groupe sur Google.
J'ai trouvé un petit post sur la manière de rendre un formulaire
transparent. keepcool m'a gentiment aidé en me communiquant un lien
intéressant sur un code VB de Karl E. Peterson. Je l'en remercie.
J'ai adpaté ce code sous access et j'enverrais volontiers la base de
démo à ceux que ça intéresse.
Actuellement, ca fonctionne uniquement avec un formulaire modal. Et
bien entendu sous windows XP car je pense que 98 ne sait pas rendre la
transparence.
je connais depuis peu ce groupe de discussion. J'y ai pourtant déjà trouvé beaucoup d'aides et de conseils en fouillant dans les archives du groupe sur Google.
J'ai trouvé un petit post sur la manière de rendre un formulaire transparent. keepcool m'a gentiment aidé en me communiquant un lien intéressant sur un code VB de Karl E. Peterson. Je l'en remercie.
J'ai adpaté ce code sous access et j'enverrais volontiers la base de démo à ceux que ça intéresse.
Actuellement, ca fonctionne uniquement avec un formulaire modal. Et bien entendu sous windows XP car je pense que 98 ne sait pas rendre la transparence.
Merci encore pour l'entraide.
Jean-louis.
Guy DETIENNE
Salut ;O)
Au fait, il suffit de chercher la code pour Visual Basic 6 et l'intégrer directement dans Access. Il n'y a aucun changement à faire, les formulaires d'Access possédant un handle.
L'API concernée est SetLayeredWindowAttributes et fonctionne très bien avec Access. J'ai même réalisé un fade-in/fade-out avec des formulaires Access. L'effet est parfait ! Et en effet, mieux vaut que le formulaire soit modal.
Guy
a écrit dans le message de news:
Bonjour à tous,
je connais depuis peu ce groupe de discussion. J'y ai pourtant déjà trouvé beaucoup d'aides et de conseils en fouillant dans les archives du groupe sur Google.
J'ai trouvé un petit post sur la manière de rendre un formulaire transparent. keepcool m'a gentiment aidé en me communiquant un lien intéressant sur un code VB de Karl E. Peterson. Je l'en remercie.
J'ai adpaté ce code sous access et j'enverrais volontiers la base de démo à ceux que ça intéresse.
Actuellement, ca fonctionne uniquement avec un formulaire modal. Et bien entendu sous windows XP car je pense que 98 ne sait pas rendre la transparence.
Merci encore pour l'entraide.
Jean-louis.
Salut ;O)
Au fait, il suffit de chercher la code pour Visual Basic 6 et l'intégrer
directement dans Access.
Il n'y a aucun changement à faire, les formulaires d'Access possédant un
handle.
L'API concernée est SetLayeredWindowAttributes et fonctionne très bien avec
Access.
J'ai même réalisé un fade-in/fade-out avec des formulaires Access. L'effet
est parfait !
Et en effet, mieux vaut que le formulaire soit modal.
Guy
<jeanlouis.delvaux@ping.be> a écrit dans le message de
news:fde62a7e.0502160633.24969316@posting.google.com...
Bonjour à tous,
je connais depuis peu ce groupe de discussion. J'y ai pourtant déjà
trouvé beaucoup d'aides et de conseils en fouillant dans les archives
du groupe sur Google.
J'ai trouvé un petit post sur la manière de rendre un formulaire
transparent. keepcool m'a gentiment aidé en me communiquant un lien
intéressant sur un code VB de Karl E. Peterson. Je l'en remercie.
J'ai adpaté ce code sous access et j'enverrais volontiers la base de
démo à ceux que ça intéresse.
Actuellement, ca fonctionne uniquement avec un formulaire modal. Et
bien entendu sous windows XP car je pense que 98 ne sait pas rendre la
transparence.
Au fait, il suffit de chercher la code pour Visual Basic 6 et l'intégrer directement dans Access. Il n'y a aucun changement à faire, les formulaires d'Access possédant un handle.
L'API concernée est SetLayeredWindowAttributes et fonctionne très bien avec Access. J'ai même réalisé un fade-in/fade-out avec des formulaires Access. L'effet est parfait ! Et en effet, mieux vaut que le formulaire soit modal.
Guy
a écrit dans le message de news:
Bonjour à tous,
je connais depuis peu ce groupe de discussion. J'y ai pourtant déjà trouvé beaucoup d'aides et de conseils en fouillant dans les archives du groupe sur Google.
J'ai trouvé un petit post sur la manière de rendre un formulaire transparent. keepcool m'a gentiment aidé en me communiquant un lien intéressant sur un code VB de Karl E. Peterson. Je l'en remercie.
J'ai adpaté ce code sous access et j'enverrais volontiers la base de démo à ceux que ça intéresse.
Actuellement, ca fonctionne uniquement avec un formulaire modal. Et bien entendu sous windows XP car je pense que 98 ne sait pas rendre la transparence.
Merci encore pour l'entraide.
Jean-louis.
Jean-Louis Delvaux
En fait en vérifiant je m'aperçois qu'il faut que le formulaire soit en mode fenêtre indépendante mais peut ou non être modal....
Jean-louis. a écrit dans le message de news:
Bonjour à tous,
je connais depuis peu ce groupe de discussion. J'y ai pourtant déjà trouvé beaucoup d'aides et de conseils en fouillant dans les archives du groupe sur Google.
J'ai trouvé un petit post sur la manière de rendre un formulaire transparent. keepcool m'a gentiment aidé en me communiquant un lien intéressant sur un code VB de Karl E. Peterson. Je l'en remercie.
J'ai adpaté ce code sous access et j'enverrais volontiers la base de démo à ceux que ça intéresse.
Actuellement, ca fonctionne uniquement avec un formulaire modal. Et bien entendu sous windows XP car je pense que 98 ne sait pas rendre la transparence.
Merci encore pour l'entraide.
Jean-louis.
En fait en vérifiant je m'aperçois qu'il faut que le formulaire soit en mode
fenêtre indépendante mais peut ou non être modal....
Jean-louis.
<jeanlouis.delvaux@ping.be> a écrit dans le message de
news:fde62a7e.0502160633.24969316@posting.google.com...
Bonjour à tous,
je connais depuis peu ce groupe de discussion. J'y ai pourtant déjà
trouvé beaucoup d'aides et de conseils en fouillant dans les archives
du groupe sur Google.
J'ai trouvé un petit post sur la manière de rendre un formulaire
transparent. keepcool m'a gentiment aidé en me communiquant un lien
intéressant sur un code VB de Karl E. Peterson. Je l'en remercie.
J'ai adpaté ce code sous access et j'enverrais volontiers la base de
démo à ceux que ça intéresse.
Actuellement, ca fonctionne uniquement avec un formulaire modal. Et
bien entendu sous windows XP car je pense que 98 ne sait pas rendre la
transparence.
En fait en vérifiant je m'aperçois qu'il faut que le formulaire soit en mode fenêtre indépendante mais peut ou non être modal....
Jean-louis. a écrit dans le message de news:
Bonjour à tous,
je connais depuis peu ce groupe de discussion. J'y ai pourtant déjà trouvé beaucoup d'aides et de conseils en fouillant dans les archives du groupe sur Google.
J'ai trouvé un petit post sur la manière de rendre un formulaire transparent. keepcool m'a gentiment aidé en me communiquant un lien intéressant sur un code VB de Karl E. Peterson. Je l'en remercie.
J'ai adpaté ce code sous access et j'enverrais volontiers la base de démo à ceux que ça intéresse.
Actuellement, ca fonctionne uniquement avec un formulaire modal. Et bien entendu sous windows XP car je pense que 98 ne sait pas rendre la transparence.
Merci encore pour l'entraide.
Jean-louis.
Guy DETIENNE
Salut ;O)
Selon mon expérience elle doit être indépendante mais pas obligatoirement modale. L'un n'empêche pas l'autre.
Guy
"Jean-Louis Delvaux" a écrit dans le message de news:42137c22$0$15765$
En fait en vérifiant je m'aperçois qu'il faut que le formulaire soit en mode
fenêtre indépendante mais peut ou non être modal....
Jean-louis. a écrit dans le message de news:
Bonjour à tous,
je connais depuis peu ce groupe de discussion. J'y ai pourtant déjà trouvé beaucoup d'aides et de conseils en fouillant dans les archives du groupe sur Google.
J'ai trouvé un petit post sur la manière de rendre un formulaire transparent. keepcool m'a gentiment aidé en me communiquant un lien intéressant sur un code VB de Karl E. Peterson. Je l'en remercie.
J'ai adpaté ce code sous access et j'enverrais volontiers la base de démo à ceux que ça intéresse.
Actuellement, ca fonctionne uniquement avec un formulaire modal. Et bien entendu sous windows XP car je pense que 98 ne sait pas rendre la transparence.
Merci encore pour l'entraide.
Jean-louis.
Salut ;O)
Selon mon expérience elle doit être indépendante mais pas obligatoirement
modale.
L'un n'empêche pas l'autre.
Guy
"Jean-Louis Delvaux" <jeanlouis.delvaux@ping.be> a écrit dans le message de
news:42137c22$0$15765$ba620e4c@news.skynet.be...
En fait en vérifiant je m'aperçois qu'il faut que le formulaire soit en
mode
fenêtre indépendante mais peut ou non être modal....
Jean-louis.
<jeanlouis.delvaux@ping.be> a écrit dans le message de
news:fde62a7e.0502160633.24969316@posting.google.com...
Bonjour à tous,
je connais depuis peu ce groupe de discussion. J'y ai pourtant déjà
trouvé beaucoup d'aides et de conseils en fouillant dans les archives
du groupe sur Google.
J'ai trouvé un petit post sur la manière de rendre un formulaire
transparent. keepcool m'a gentiment aidé en me communiquant un lien
intéressant sur un code VB de Karl E. Peterson. Je l'en remercie.
J'ai adpaté ce code sous access et j'enverrais volontiers la base de
démo à ceux que ça intéresse.
Actuellement, ca fonctionne uniquement avec un formulaire modal. Et
bien entendu sous windows XP car je pense que 98 ne sait pas rendre la
transparence.
Selon mon expérience elle doit être indépendante mais pas obligatoirement modale. L'un n'empêche pas l'autre.
Guy
"Jean-Louis Delvaux" a écrit dans le message de news:42137c22$0$15765$
En fait en vérifiant je m'aperçois qu'il faut que le formulaire soit en mode
fenêtre indépendante mais peut ou non être modal....
Jean-louis. a écrit dans le message de news:
Bonjour à tous,
je connais depuis peu ce groupe de discussion. J'y ai pourtant déjà trouvé beaucoup d'aides et de conseils en fouillant dans les archives du groupe sur Google.
J'ai trouvé un petit post sur la manière de rendre un formulaire transparent. keepcool m'a gentiment aidé en me communiquant un lien intéressant sur un code VB de Karl E. Peterson. Je l'en remercie.
J'ai adpaté ce code sous access et j'enverrais volontiers la base de démo à ceux que ça intéresse.
Actuellement, ca fonctionne uniquement avec un formulaire modal. Et bien entendu sous windows XP car je pense que 98 ne sait pas rendre la transparence.
Merci encore pour l'entraide.
Jean-louis.
ToftiNC
Bonjour,
cela intéresse aussi
Merci
a écrit dans le message de news:
Bonjour à tous,
je connais depuis peu ce groupe de discussion. J'y ai pourtant déjà trouvé beaucoup d'aides et de conseils en fouillant dans les archives du groupe sur Google.
J'ai trouvé un petit post sur la manière de rendre un formulaire transparent. keepcool m'a gentiment aidé en me communiquant un lien intéressant sur un code VB de Karl E. Peterson. Je l'en remercie.
J'ai adpaté ce code sous access et j'enverrais volontiers la base de démo à ceux que ça intéresse.
Actuellement, ca fonctionne uniquement avec un formulaire modal. Et bien entendu sous windows XP car je pense que 98 ne sait pas rendre la transparence.
Merci encore pour l'entraide.
Jean-louis.
Bonjour,
cela intéresse aussi
toftinc@yahoo.fr
Merci
<jeanlouis.delvaux@ping.be> a écrit dans le message de news:
fde62a7e.0502160633.24969316@posting.google.com...
Bonjour à tous,
je connais depuis peu ce groupe de discussion. J'y ai pourtant déjà
trouvé beaucoup d'aides et de conseils en fouillant dans les archives
du groupe sur Google.
J'ai trouvé un petit post sur la manière de rendre un formulaire
transparent. keepcool m'a gentiment aidé en me communiquant un lien
intéressant sur un code VB de Karl E. Peterson. Je l'en remercie.
J'ai adpaté ce code sous access et j'enverrais volontiers la base de
démo à ceux que ça intéresse.
Actuellement, ca fonctionne uniquement avec un formulaire modal. Et
bien entendu sous windows XP car je pense que 98 ne sait pas rendre la
transparence.
je connais depuis peu ce groupe de discussion. J'y ai pourtant déjà trouvé beaucoup d'aides et de conseils en fouillant dans les archives du groupe sur Google.
J'ai trouvé un petit post sur la manière de rendre un formulaire transparent. keepcool m'a gentiment aidé en me communiquant un lien intéressant sur un code VB de Karl E. Peterson. Je l'en remercie.
J'ai adpaté ce code sous access et j'enverrais volontiers la base de démo à ceux que ça intéresse.
Actuellement, ca fonctionne uniquement avec un formulaire modal. Et bien entendu sous windows XP car je pense que 98 ne sait pas rendre la transparence.
Merci encore pour l'entraide.
Jean-louis.
Titi
Bonjour, je suis aussi interessé,
Merci d'avance
Bonjour,
cela intéresse aussi
Merci
a écrit dans le message de news:
Bonjour à tous,
je connais depuis peu ce groupe de discussion. J'y ai pourtant déjà trouvé beaucoup d'aides et de conseils en fouillant dans les archives du groupe sur Google.
J'ai trouvé un petit post sur la manière de rendre un formulaire transparent. keepcool m'a gentiment aidé en me communiquant un lien intéressant sur un code VB de Karl E. Peterson. Je l'en remercie.
J'ai adpaté ce code sous access et j'enverrais volontiers la base de démo à ceux que ça intéresse.
Actuellement, ca fonctionne uniquement avec un formulaire modal. Et bien entendu sous windows XP car je pense que 98 ne sait pas rendre la transparence.
Merci encore pour l'entraide.
Jean-louis.
Bonjour,
je suis aussi interessé,
Merci d'avance
allaoui@allaoui.net
Bonjour,
cela intéresse aussi
toftinc@yahoo.fr
Merci
<jeanlouis.delvaux@ping.be> a écrit dans le message de news:
fde62a7e.0502160633.24969316@posting.google.com...
Bonjour à tous,
je connais depuis peu ce groupe de discussion. J'y ai pourtant déjà
trouvé beaucoup d'aides et de conseils en fouillant dans les archives
du groupe sur Google.
J'ai trouvé un petit post sur la manière de rendre un formulaire
transparent. keepcool m'a gentiment aidé en me communiquant un lien
intéressant sur un code VB de Karl E. Peterson. Je l'en remercie.
J'ai adpaté ce code sous access et j'enverrais volontiers la base de
démo à ceux que ça intéresse.
Actuellement, ca fonctionne uniquement avec un formulaire modal. Et
bien entendu sous windows XP car je pense que 98 ne sait pas rendre la
transparence.
je connais depuis peu ce groupe de discussion. J'y ai pourtant déjà trouvé beaucoup d'aides et de conseils en fouillant dans les archives du groupe sur Google.
J'ai trouvé un petit post sur la manière de rendre un formulaire transparent. keepcool m'a gentiment aidé en me communiquant un lien intéressant sur un code VB de Karl E. Peterson. Je l'en remercie.
J'ai adpaté ce code sous access et j'enverrais volontiers la base de démo à ceux que ça intéresse.
Actuellement, ca fonctionne uniquement avec un formulaire modal. Et bien entendu sous windows XP car je pense que 98 ne sait pas rendre la transparence.
Merci encore pour l'entraide.
Jean-louis.
Jean-Louis Delvaux
Bonjour à tous,
Apparemment j'ai des problèmes actuellement avec mon fai : serveur de mail très lent surtout avec pièces jointes.
Donc, comme je n'arrive pas à envoyer la base exemple à ceux qui l'ont demandée, j'indique ci-après la marche à suivre.
1. Créer un nouveau module et y copier le code suivant :
Option Explicit
Public Declare Function SetLayeredWindowAttributes Lib "user32" (ByVal hWnd As Long, ByVal crKey As Long, ByVal bAlpha As Long, ByVal dwFlags As Long) As Long Public Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal hWnd As Long, ByVal nIndex As Long) As Long Public Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hWnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
Public Const LWA_ALPHA = &H2& Public Const GWL_EXSTYLE = (-20) Public Const WS_EX_LAYERED = &H80000
Public Sub DefTrans(H As Long, btrans As Byte)
'H représente le Hwnd du formulaire (obligatoirement avec propriété "Fen Indépendante" à OUI ) 'btrans représente le degré de transparence de 0 (invisible) à 255 (opaque) 'appel sur événement load du formulaire : call DefTrans(Me.hWnd,220)
Dim lOldStyle As Long lOldStyle = GetWindowLong(H, GWL_EXSTYLE) SetWindowLong H, GWL_EXSTYLE, lOldStyle Or WS_EX_LAYERED SetLayeredWindowAttributes H, 0, btrans, LWA_ALPHA End Sub
ensuite, sur l'événement "Sur chargement" du formulaire que l'on veut rendre transparent le code suivant :
call DefTrans(Me.hWnd, 150).
le deuxième argument représente le degré de transaprence de 0 (invisible) à 255 (opaque).
Cordialement
Jean-Louis.
a écrit dans le message de news:
Bonjour à tous,
je connais depuis peu ce groupe de discussion. J'y ai pourtant déjà trouvé beaucoup d'aides et de conseils en fouillant dans les archives du groupe sur Google.
J'ai trouvé un petit post sur la manière de rendre un formulaire transparent. keepcool m'a gentiment aidé en me communiquant un lien intéressant sur un code VB de Karl E. Peterson. Je l'en remercie.
J'ai adpaté ce code sous access et j'enverrais volontiers la base de démo à ceux que ça intéresse.
Actuellement, ca fonctionne uniquement avec un formulaire modal. Et bien entendu sous windows XP car je pense que 98 ne sait pas rendre la transparence.
Merci encore pour l'entraide.
Jean-louis.
Bonjour à tous,
Apparemment j'ai des problèmes actuellement avec mon fai : serveur de mail
très lent surtout avec pièces jointes.
Donc, comme je n'arrive pas à envoyer la base exemple à ceux qui l'ont
demandée, j'indique ci-après la marche à suivre.
1. Créer un nouveau module et y copier le code suivant :
Option Explicit
Public Declare Function SetLayeredWindowAttributes Lib "user32" (ByVal hWnd
As Long, ByVal crKey As Long, ByVal bAlpha As Long, ByVal dwFlags As Long)
As Long
Public Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA"
(ByVal hWnd As Long, ByVal nIndex As Long) As Long
Public Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA"
(ByVal hWnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
Public Const LWA_ALPHA = &H2&
Public Const GWL_EXSTYLE = (-20)
Public Const WS_EX_LAYERED = &H80000
Public Sub DefTrans(H As Long, btrans As Byte)
'H représente le Hwnd du formulaire (obligatoirement avec propriété "Fen
Indépendante" à OUI )
'btrans représente le degré de transparence de 0 (invisible) à 255 (opaque)
'appel sur événement load du formulaire : call DefTrans(Me.hWnd,220)
Dim lOldStyle As Long
lOldStyle = GetWindowLong(H, GWL_EXSTYLE)
SetWindowLong H, GWL_EXSTYLE, lOldStyle Or WS_EX_LAYERED
SetLayeredWindowAttributes H, 0, btrans, LWA_ALPHA
End Sub
ensuite, sur l'événement "Sur chargement" du formulaire que l'on veut rendre
transparent le code suivant :
call DefTrans(Me.hWnd, 150).
le deuxième argument représente le degré de transaprence de 0 (invisible) à
255 (opaque).
Cordialement
Jean-Louis.
<jeanlouis.delvaux@ping.be> a écrit dans le message de
news:fde62a7e.0502160633.24969316@posting.google.com...
Bonjour à tous,
je connais depuis peu ce groupe de discussion. J'y ai pourtant déjà
trouvé beaucoup d'aides et de conseils en fouillant dans les archives
du groupe sur Google.
J'ai trouvé un petit post sur la manière de rendre un formulaire
transparent. keepcool m'a gentiment aidé en me communiquant un lien
intéressant sur un code VB de Karl E. Peterson. Je l'en remercie.
J'ai adpaté ce code sous access et j'enverrais volontiers la base de
démo à ceux que ça intéresse.
Actuellement, ca fonctionne uniquement avec un formulaire modal. Et
bien entendu sous windows XP car je pense que 98 ne sait pas rendre la
transparence.
Apparemment j'ai des problèmes actuellement avec mon fai : serveur de mail très lent surtout avec pièces jointes.
Donc, comme je n'arrive pas à envoyer la base exemple à ceux qui l'ont demandée, j'indique ci-après la marche à suivre.
1. Créer un nouveau module et y copier le code suivant :
Option Explicit
Public Declare Function SetLayeredWindowAttributes Lib "user32" (ByVal hWnd As Long, ByVal crKey As Long, ByVal bAlpha As Long, ByVal dwFlags As Long) As Long Public Declare Function GetWindowLong Lib "user32" Alias "GetWindowLongA" (ByVal hWnd As Long, ByVal nIndex As Long) As Long Public Declare Function SetWindowLong Lib "user32" Alias "SetWindowLongA" (ByVal hWnd As Long, ByVal nIndex As Long, ByVal dwNewLong As Long) As Long
Public Const LWA_ALPHA = &H2& Public Const GWL_EXSTYLE = (-20) Public Const WS_EX_LAYERED = &H80000
Public Sub DefTrans(H As Long, btrans As Byte)
'H représente le Hwnd du formulaire (obligatoirement avec propriété "Fen Indépendante" à OUI ) 'btrans représente le degré de transparence de 0 (invisible) à 255 (opaque) 'appel sur événement load du formulaire : call DefTrans(Me.hWnd,220)
Dim lOldStyle As Long lOldStyle = GetWindowLong(H, GWL_EXSTYLE) SetWindowLong H, GWL_EXSTYLE, lOldStyle Or WS_EX_LAYERED SetLayeredWindowAttributes H, 0, btrans, LWA_ALPHA End Sub
ensuite, sur l'événement "Sur chargement" du formulaire que l'on veut rendre transparent le code suivant :
call DefTrans(Me.hWnd, 150).
le deuxième argument représente le degré de transaprence de 0 (invisible) à 255 (opaque).
Cordialement
Jean-Louis.
a écrit dans le message de news:
Bonjour à tous,
je connais depuis peu ce groupe de discussion. J'y ai pourtant déjà trouvé beaucoup d'aides et de conseils en fouillant dans les archives du groupe sur Google.
J'ai trouvé un petit post sur la manière de rendre un formulaire transparent. keepcool m'a gentiment aidé en me communiquant un lien intéressant sur un code VB de Karl E. Peterson. Je l'en remercie.
J'ai adpaté ce code sous access et j'enverrais volontiers la base de démo à ceux que ça intéresse.
Actuellement, ca fonctionne uniquement avec un formulaire modal. Et bien entendu sous windows XP car je pense que 98 ne sait pas rendre la transparence.