Page 1 sur 2
Fenetre transparante
Publié : mer. 29/déc./2004 17:11
par brossden
Bonjour
Tout es dans le titre comment faire pour qu'une fenêtre soit transparante.
J'avais eu une réponse mais le lien qui m'a été donné à l'époque ne marche plus
merci au Soldat Inconnu
et à Denis
s'ils lisent ces mots !
Publié : mer. 29/déc./2004 17:30
par Backup
Code : Tout sélectionner
Declare SetWinTransparency(WinHandle.l, Transparency_Level.l)
LoadFont(1, "romand", 300 )
UseFont(1)
Texte.s="ceci est un essai"
WindowID = OpenWindow(1, 50, 50, 200, 200, #PB_Window_SystemMenu|#PB_Window_MinimizeGadget , "hello")
WindowID = WindowID(1)
; Pour changer le niveau de transparence de la fenêtre
; Le niveau de transparence doit être compris entre 1 (transparence totale) et 255 (opaque)
SetWinTransparency (WindowID(), 150) ; ici on appel la procedure de transparence de fenetre
Repeat
UseFont(1)
Event=WaitWindowEvent()
; ici c'est la boucle principale
; a toi de rajouter des gadgats
; ResizeWindow(10, 1000)
StartDrawing(WindowOutput())
Locate(0, 0)
DrawText(Texte.s)
StopDrawing()
Until Event=#PB_Event_CloseWindow
Procedure SetWinTransparency(WinHandle.l, Transparency_Level.l)
SetWindowLong_(WinHandle, #GWL_EXSTYLE, GetWindowLong_(WinHandle, #GWL_EXSTYLE) | $00080000) ; #WS_EX_LAYERED = $00080000
If OpenLibrary(0, "user32.dll")
CallFunction(0, "SetLayeredWindowAttributes", WinHandle, 0, Transparency_Level, 2)
CloseLibrary(0)
EndIf
EndProcedure
Publié : mer. 29/déc./2004 17:32
par Oliv
Re: Fenetre transparante
Publié : mer. 29/déc./2004 17:33
par Anonyme2
brossden a écrit :Bonjour
Tout es dans le titre comment faire pour qu'une fenêtre soit transparante.
J'avais eu une réponse mais le lien qui m'a été donné à l'époque ne marche plus
merci au Soldat Inconnu
et à Denis
s'ils lisent ces mots !
Ca ne me dit rien
et le code de Dobro doit être celui du soldat inconnu.
Publié : mer. 29/déc./2004 17:36
par Backup
Ca ne me dit rien Rolling Eyes et le code de Dobro doit être celui du soldat inconnu
j'ai pas pretendu que c'etait le mien je repond a la question c'est tout !
Publié : mer. 29/déc./2004 17:47
par Anonyme2
Dobro a écrit :Ca ne me dit rien Rolling Eyes et le code de Dobro doit être celui du soldat inconnu
j'ai pas pretendu que c'etait le mien je repond a la question c'est tout !
Je répondais à Brossden et je ne pensais pas que tu prendrais ça de travers
, rien dit sur toi
Publié : mer. 29/déc./2004 17:48
par Backup
pensais pas que tu prendrais ça de travers
pas pris de travers
Publié : mer. 29/déc./2004 17:50
par Anonyme2
Publié : mer. 29/déc./2004 17:51
par Backup
j'ai juste oublié le "
"
Publié : lun. 03/janv./2005 20:14
par Pingtix
Ca fonctionne avec tous les windows ou seulement XP ?
Publié : lun. 03/janv./2005 20:19
par Guimauve
Si je me souviens bien ça fonctione avec Win2000. Mais je suis certain que ça fonctionne avec Win XP. Pour les autres versions de windows ce n'est pas supporté.
A+
Guimauve
Publié : lun. 03/janv./2005 20:34
par Pingtix
Pas supporté ? Ca veut dire que le programme plante ou que ca fonctionne et que la fenetre est normale ?
Publié : lun. 03/janv./2005 21:13
par Oliv
ça ne vas pas sur W98, mais sinon ouvre la DLL et teste si la fonction y est avant de l'utiliser, je crois que Le Soldat Inconnu l'avait fait.
Publié : lun. 03/janv./2005 21:17
par Le Soldat Inconnu
Uniquement sur win 2000 et XP
Et le code n'est pas de moi, je me rapelle plus du nom de l'auteur, voir sur le musée si je me trompe pas
Publié : jeu. 09/juin/2005 18:17
par lionel_om
Dsl de faire remonter un vieux post, mais plutot qu'en recréer un nouvo je préfère mettre ici ma question.
Voila, je voudrais savoir comment rendre l'arrière plan de ma fenêtre transparante, mais pas toute la fenêtre. Je m'explique :
Je voudrais avoir (pour mon lecteur MP3, cf zone débutant) un cadre arrondi et mettre une image d'arrière plan. Cf le screen du logiciel JetAudio :
Merci d'avance
Lionel