Window-Skins

Anfängerfragen zum Programmieren mit PureBasic.
Benutzeravatar
roherter
Beiträge: 1407
Registriert: 10.04.2005 18:58
Kontaktdaten:

Beitrag von roherter »

roherter hat geschrieben:

Code: Alles auswählen

Hwnd=getdc_(gadgetid)
Gibt den Device Context zurück das direkte Hanle
Purebasic 5.0 32bit und 64 bit

I'm back from hell
Eclipse
Beiträge: 99
Registriert: 04.06.2005 18:09

Beitrag von Eclipse »

Das ist mir schon klar, aber das kann man ja nicht genauso wie ein normales Fenster verwenden. Transparent kriege ich so nichts.
Benutzeravatar
roherter
Beiträge: 1407
Registriert: 10.04.2005 18:58
Kontaktdaten:

Beitrag von roherter »

Code: Alles auswählen

;{- Enumerations / DataSections
;{ Windows
Enumeration
  #Window_0
EndEnumeration
;}
;{ Gadgets
Enumeration
  #Web_0
EndEnumeration
;}
;}
Procedure OpenWindow_Window_0()
  If OpenWindow(0, 450, 200, 400, 400, "Window_0", #PB_Window_SystemMenu|#PB_Window_SizeGadget|#PB_Window_MinimizeGadget|#PB_Window_TitleBar)
    If CreateGadgetList(WindowID(#Window_0))
      WebGadget(#Web_0, 5, 5, 385, 385, "about:WebGadget_0")
    EndIf
  EndIf
EndProcedure

OpenWindow_Window_0()
SetWindowLong_(WindowID(0),#GWL_EXSTYLE,GetWindowLong_(WindowID(0),#GWL_EXSTYLE)|524288)
SetLayeredWindowAttributes_(WindowID(0),RGB(255,255,255),0,1)

;{- Event loop
Repeat
  Event = WaitWindowEvent()
  Select Event
    ; ///////////////////
    Case #PB_Event_Gadget
      EventGadget = EventGadget()
      EventType = EventType()
      If EventGadget = #Web_0
      EndIf
      ; //////////////////////
    Case #PB_Event_CloseWindow
      EventWindow = EventWindow()
      If EventWindow = #Window_0
        CloseWindow(#Window_0)
        Break
      EndIf
  EndSelect
ForEver
;
;}
Wieso hier ist auch das webgadget tranzparent,zumindest alles was weiß ist.
Verstehe nicht wie du das meinst?
Purebasic 5.0 32bit und 64 bit

I'm back from hell
Eclipse
Beiträge: 99
Registriert: 04.06.2005 18:09

Beitrag von Eclipse »

Bei mir eben nicht :|
Wenn ich die Fensterfarbe in deinem Beispiel ändere, dann hebt sich das Gadget vom Rest ab.

Habe nun aber mein Problem anderweitig gelöst, trotzdem vielen Dank für die Geduld :allright:
Antworten