Hallo, ich hab mal eine Frage undzwar hab ich diesen Code:
er bewerktstelligt das ausschneiden von den einzelnen Spielkarten aus meinem Image, somit hab ich nur eine Bilddatei in den Ressourcen die alle 52 Karten enthält.
Das Problem ist allerdings, dass ich logischerweiße diesen code 52 mal in einer Schleife durchlaufe um alle Kartenbilder zu bekommen diese werden in einem Array gespeichert.
Das dauert nunmal seine Zeit ca. 30 sec.
Habt ihr vielleicht eine idee wie ich das schneller hinbekomme?
LG Lightbull
VB.NET-Quellcode
- Private Function GetKarte(ByVal Pos As Point) As Image
- Dim img As Image = Nothing
- Dim minw, minh As Integer
- Select Case kartensize
- Case Is = KartenGr.Groß
- img = My.Resources.KartenDecks
- minw = 146
- minh = 196
- Case Is = KartenGr.Klein
- img = My.Resources.KartenDecks_klein
- minw = 146 / 2
- minh = 196 / 2
- End Select
- Dim cur As New Bitmap(minw - 4, minh - 4)
- Dim g As Graphics = Graphics.FromImage(cur)
- g.CompositingMode = System.Drawing.Drawing2D.CompositingMode.SourceCopy
- g.DrawImage(img, New Rectangle(0, 0, cur.Width, cur.Height), _
- New Rectangle(minw * Pos.X + 2, minh * Pos.Y + 2, cur.Width, cur.Height), GraphicsUnit.Pixel)
- g.Flush()
- Return cur
- End Function
er bewerktstelligt das ausschneiden von den einzelnen Spielkarten aus meinem Image, somit hab ich nur eine Bilddatei in den Ressourcen die alle 52 Karten enthält.
Das Problem ist allerdings, dass ich logischerweiße diesen code 52 mal in einer Schleife durchlaufe um alle Kartenbilder zu bekommen diese werden in einem Array gespeichert.
Das dauert nunmal seine Zeit ca. 30 sec.
Habt ihr vielleicht eine idee wie ich das schneller hinbekomme?
LG Lightbull