Seite 1 von 4

Textgadget

Verfasst: 14.07.2005 14:35
von Konne
Ist es möglich ein Textgadget durchsichtig zu machen? Also so das der Hintergrund durchkommt?

Mfg Konne und THX für Lösungen...

Verfasst: 16.07.2005 03:49
von Konne
Hat wirklich keiner ne Ahnung wie das gehen könnte?
Oder geht das einfach net?
:|

Verfasst: 16.07.2005 10:00
von DarkDragon
Das wurde schon einmal gefragt, da wusste auch keiner eine richtige Antwort.

Verfasst: 16.07.2005 12:08
von pogi02
ähm gugg mal im CodeArchiv vielleicht lässt sich da was gutes/brachbares finden

Verfasst: 16.07.2005 15:07
von vonTurnundTaxis
Das gleiche Problem hatte ich auch mal und habe es mit DrawText() gelöst.

Verfasst: 16.07.2005 15:15
von Ynnus
EIn Textgadget ist ein Fenster der Fensterklasse "EDIT" und somit auch nur ein Fenster. Es gibt doch Funktionen welche Fenster transparent machen. Wie diese lauten weiß ich zwar nicht, aber es sollte damit möglich sein, damit auch ein Editfeld durchsichtig zu machen.

Verfasst: 16.07.2005 16:49
von nicolaus

Code: Alles auswählen

Procedure SetWinTransparency (WinHandle.l, Transparency_Level.l) ;setzt die Transparenz wert von 0 (voll transparent) bis 255 (voll sichtbar)
  SetWindowLong_(WinHandle,#GWL_EXSTYLE,$00080000)                 
  SetLayeredWindowAttributes_(WinHandle,0,Transparency_Level,2)     
EndProcedure 


OpenWindow(0,0,0,200,200,#PB_Window_SystemMenu|#PB_Window_ScreenCentered,"test")
OpenWindow(1,WindowX()+5,WindowY()+25,100,20,#WS_POPUP,"",WindowID(0))
CreateGadgetList(WindowID(1))
htxg = TextGadget(1,0,0,100,20,"testtext")
SetWinTransparency(WindowID(1),80)
UseWindow(0)
ActivateWindow()
Repeat:Until WaitWindowEvent() = #PB_Event_CloseWindow
die procedure ist so weit ich mich erinnern kann von Danilo

Verfasst: 16.07.2005 18:11
von DarkDragon
nicolaus hat geschrieben:

Code: Alles auswählen

Procedure SetWinTransparency (WinHandle.l, Transparency_Level.l) ;setzt die Transparenz wert von 0 (voll transparent) bis 255 (voll sichtbar)
  SetWindowLong_(WinHandle,#GWL_EXSTYLE,$00080000)                 
  SetLayeredWindowAttributes_(WinHandle,0,Transparency_Level,2)     
EndProcedure 


OpenWindow(0,0,0,200,200,#PB_Window_SystemMenu|#PB_Window_ScreenCentered,"test")
OpenWindow(1,WindowX()+5,WindowY()+25,100,20,#WS_POPUP,"",WindowID(0))
CreateGadgetList(WindowID(1))
htxg = TextGadget(1,0,0,100,20,"testtext")
SetWinTransparency(WindowID(1),80)
UseWindow(0)
ActivateWindow()
Repeat:Until WaitWindowEvent() = #PB_Event_CloseWindow
die procedure ist so weit ich mich erinnern kann von Danilo
coole proc, allerdings braucht er glaube ich etwas anderes! Er will, dass man den Text vor einem Hintergrundbild oder so noch sieht, also den Hintergrund des Text-Gadgets sollte man wegmachen.

Verfasst: 16.07.2005 21:52
von Batze
Gibt es vielleicht einen Befehl, mit dem man ein Imagegadget nur auf einer bestimmten Farbe darstellt?
Ich wollte mal ein Fenster, wo statt dem langweiligen grau ein Hintergrundbild abgebildet wird. Also so, das das grau durch ein Bild ersetzt wird.

Edit: Ich hab am Ende alle Gadgets per Hand selber hergestellt, da ich keine Lösung gefunden habe. :lol:

Verfasst: 17.07.2005 04:03
von Konne
Danke für die Antworten auch wenn das heißt das es wohl nicht so ganz einfach ist...
PS. Das mit Draw Text hab ich mir au schon überlegt aber des würde dann bei so Sachen wie Checkboxgadgets nicht tun (Keine Abhaken durch Schrift anklicken).

Naja schad eigendlich... :cry: