Hallo NG,

als newbie versuche ich gerade folgendes.

    Private Sub Page_Load(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles MyBase.Load
        Dim objbmp As System.Drawing.Bitmap
        Dim objgraphics As System.Drawing.Graphics
        Dim objfonts As System.Drawing.Font

        objbmp = New Bitmap(100, 80)

        objgraphics = System.Drawing.Graphics.FromImage(objbmp)

        objgraphics.Clear(Color.Transparent)

        objfonts = New Font("Arial", 16, FontStyle.Bold)

        objgraphics.DrawString("test2" & vbCrLf & "HALLO2", objfonts,
Brushes.White, 3, 3)

        Response.ContentType = "image/gif"
        objbmp.Save(Response.OutputStream, ImageFormat.Gif)

        objfonts.Dispose()
        objgraphics.Dispose()
        objbmp.Dispose()
    End Sub

Das Image wird auch ausgegeben, nur leider nicht transparent, sondern
immer schwarz.

Was mache ich falsch? ;-)

Danke.

Gru�
Marco



| [aspdedotnet] als archive@jab.org subscribed
| http://www.dotnetgerman.com/archiv/aspdedotnet/ = Listenarchiv
| Sie k�nnen sich unter folgender URL an- und abmelden:
| http://www.dotnetgerman.com/listen/aspDEdotnet.asp

Antwort per Email an