Lite andra små frågor

För att få en bild (bmp) genomskinlig så måste man använda ett API.
<font size="1" face="Verdana, Arial, Helvetica, sans-serif">Kod:<font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#666600">
Private Declare Function TransparentBlt Lib "msimg32.dll" (ByVal hdc As Long, ByVal x As Long, ByVal y As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal hSrcDC As Long, ByVal xSrc As Long, ByVal ySrc As Long, ByVal nSrcWidth As Long, ByVal nSrcHeight As Long, ByVal crTransparent As Long) As Boolean

Private Sub Form_Load()
Picture1.AutoSize = True
Picture1.ScaleMode = vbPixels
Picture2.ScaleMode = vbPixels
End Sub

Private Sub Picture2_Paint()
DoEvents
TransparentBlt Picture2.hdc, 0, 0, Picture2.ScaleWidth, Picture2.ScaleHeight, Picture1.hdc, 0, 0, Picture1.ScaleWidth, Picture1.ScaleHeight, vbWhite
End Sub

I detta exemplet behöver du 2 bilder (picturebox), Picture1 är den bilden som kommer att hamna ovanpå picture2. Här är det vit färg som görs transparent, använd därför en bild i picture1 som innehåller vit som bakgrund.

------------------
Fredrik Klarqvist
f.klarqvist@spray.se
http://server.webwerkstaden.se/fredde/

[Redigerat av fredrik den 11 okt 2001]

Hmmmmmmmmm det blir lite skumt när jag implementerar koden.
Antagligen är det jag som gör fel men frågan är vart.

Jag gör en picture 1 som är en gubbe med vit bakgrund. Sen en picture2 som bara är en bakgrund tex blå.

Funktionen skall jag väll skriva in i general declare eller?

Annars kan jag inte förstå vart jag gör fel för jag använder ctrl+c ctrl+v.

Hmmmm..skumt det ska nämligen funka direkt, jag skickar ett mail med några exempel filer.

Detta API.t ska stödjas av win98 och uppåt, fungerar det inte kan det bero på vilken version av 98.an man har.

------------------
Fredrik Klarqvist
f.klarqvist@spray.se
http://server.webwerkstaden.se/fredde/

[Redigerat av fredrik den 16 okt 2001]

Kom på att jag bytt e-mail glömmde att ändra här. Den nya är nemesis1@foxracing.every1.net