Jag undrar hur man gör för att kunna få lite roligare utseende på sina program? Hittade följande artikel som kanske kan vara till hjälp : Om du kan API så är det lätt fixat: Ursäkta, jag lästa inte så noga. >Ursäkta, jag lästa inte så noga.Transparenta Forms i VB.net
Tex: Winamp där man kan ha skins som har lite udda form mm
Tänk dig att du lägger en bild på en oval på Form1
men jag vill att själva Form1 ska vara transparant men inte ovalen?!
Går detta att ordna?Sv: Transparenta Forms i VB.net
http://www.vbrad.com/pf.asp?p=source/src_region_clip_advanced.htmSv: Transparenta Forms i VB.net
Public Const GWL_EXSTYLE = (-20)
Public Const WS_EX_TRANSPARENT = &H20&
Public Const SWP_FRAMECHANGED = &H20
Public Const SWP_NOMOVE = &H2
Public Const SWP_NOSIZE = &H1
Public Const SWP_SHOWME = SWP_FRAMECHANGED Or _
SWP_NOMOVE Or SWP_NOSIZE
Public Const HWND_NOTOPMOST = -2
Declare Function SetWindowLong Lib "user32" _
Alias "SetWindowLongA" _
(ByVal hwnd As Long, ByVal nIndex As Long, _
ByVal dwNewLong As Long) As Long
Declare Function SetWindowPos Lib "user32" _
(ByVal hwnd As Long, ByVal hWndInsertAfter _
As Long, ByVal x As Long, ByVal y As Long, _
ByVal cx As Long, ByVal cy As Long, _
ByVal wFlags As Long) As Long
'-Lägg detta i en kontrollhändelse eller en egen subrutin-
SetWindowLong Me.hwnd, GWL_EXSTYLE, _ 'Här är det bara att välja konstanter
WS_EX_TRANSPARENT
SetWindowPos Me.hwnd, HWND_NOTOPMOST, _ 'Samma här
0&, 0&, 0&, 0&, SWP_SHOWME
---------'-------------------------------------------------------
Du kan också använda den bättre BitBlt funktionen (API), men lite mer kod.Sv: Transparenta Forms i VB.net
Såg nu att det stod "VB.NET".
Ber om ursäkt.Sv: Transparenta Forms i VB.net
Såg nu att det stod "VB.NET". <
Tja, inlägget ligger ju i fel forum så... ;)
Hur som haver, det finns en property på formen som heter Region. Sätt den till en region du vill använda. Regions kan klippa saker