Bitmap Leeren

Bluespide · 7. September 2009, 22:33

VB.NET-Quellcode

Public Grafic As New Bitmap(60, 60)
For i = 0 To (Feldgoesse - 1)
For j = 0 To (Feldgoesse - 1)
If Feld(i, j) = 1 Then
g.DrawImage(Fabe, New Point((i * 20), (j * 20)))
End If
Next
Next

so das funktioniert auch aber wenn ich jetzt im code das bild neu malen will

VB.NET-Quellcode

Grafic = New Bitmap(60, 60)
For k = 0 To (Feldgoesse - 1)
For j = 0 To (Feldgoesse - 1)
If Feld(k, j) = 1 Then
g.DrawImage(Fabe, New Point((k * 20), (j * 20)))
End If
Next
Next

Bleibt das bild einfach leer. wie kann ich das ändern?

FAtheone · 7. September 2009, 22:37

Warum benutzt du nicht Graphics.FillRectangle ?
Das spart bei dir 14 Zeilen Code und ist übersichtlicher.
Das sollte das Problem auch lösen.

DrawImage ist nicht dafür gedacht, Pixel zu setzen.
Dafür gibt es SetPixel.

mikeb69 · 7. September 2009, 22:37

Hallo Bluespide,

warum nicht einfach

VB.NET-Quellcode

g.clear(farbe)

Gruss

miekb69

Bluespide · 7. September 2009, 23:03

@FAtheone: ich male keine Pixel sonder ein Bild aus meinen ressourcen
@mikeb69: danke so gehts g.Clear(Color.Transparent) :thumbsup:

FAtheone · 7. September 2009, 23:13

Ach so

Upps^^
Du machst also so eine Art Kacheln, richtig?

Bluespide · 7. September 2009, 23:20

jop genau richtig

FAtheone · 7. September 2009, 23:23

Arbeite doch mit Step und gehe damit direkt die benötigte Schritteweite, anstatt bei jedem Pixel zu gucken, ob das der Anfangspunkt für eine neue Kachel ist oder nicht.

Bluespide · 7. September 2009, 23:25

??
also ich habe nen array (3,3) den ich durch gehen und ein kachel ist 20pixel breit also *20 für ein 60x60 bild

Bitmap Leeren

Bitmap Leeren

VB.NET-Quellcode

VB.NET-Quellcode

VB.NET-Quellcode

Ähnliche Themen

3 Benutzer haben hier geschrieben