nach langer suche im Frum geb ich nun auf und hoffe auf eure Mithilfe.
1. Gibt es denn die Möglichkeit die Vordergrundfarbe eines z. B. Textgadgets Transparent zu machen, oder hier eine Transparents von 25% zu definieren?
Evtl. hat ja jemand hier einen passenden API Befehl?
2. Man kann ja die Hintergrundfarbe eines Gadgets Transparent machen:
Code: Alles auswählen
Procedure WCB(WindowID, Message, wParam, lParam)
Result = #PB_ProcessPureBasicEvents
Select Message
Case #WM_CTLCOLORSTATIC
Select lparam
Case GadgetID(1)
SetBkMode_(wparam,#TRANSPARENT)
SetTextColor_(wParam,#TRANSPARENT))
ProcedureReturn GetStockObject_(#HOLLOW_BRUSH)
EndSelect
EndSelect
ProcedureReturn Result
EndProcedure
OpenWindow(0,0,0,500,250,"Window",#PB_Window_SystemMenu)
TextGadget(1,10,10,120,20,"Transparenter Text",0)
SetWindowCallback(@WCB(),0)
InvalidateRect_(WindowID(0), #Null, #True)