Moin zusammen,
ich stehe vor einem Problem, bei dem ich nicht weiter komme. Ich muss eine 2D Map in einen Tile Mapeditor packen und dementsprechend zoomen, Koordinaten kennzeichnen usw...
Mir ist klar das Forms nicht gut dafür ist, trotzdem möchte ich das mit Forms realisieren.
Hier mein Problem:
Die Tile Map zu erstellen ist ja kein Problem, ich kriege das Drag and Drop nicht hin.
Hier der Source vom Laden:
Kann mir dabei jemand helfen? Wäre super!
ich stehe vor einem Problem, bei dem ich nicht weiter komme. Ich muss eine 2D Map in einen Tile Mapeditor packen und dementsprechend zoomen, Koordinaten kennzeichnen usw...
Mir ist klar das Forms nicht gut dafür ist, trotzdem möchte ich das mit Forms realisieren.
Hier mein Problem:
Die Tile Map zu erstellen ist ja kein Problem, ich kriege das Drag and Drop nicht hin.
Hier der Source vom Laden:
VB.NET-Quellcode
- Private Sub p_MouseMove(ByVal sender As Object, ByVal e As MouseEventArgs)
- Debug.WriteLine(e.X.ToString & e.Y.ToString)
- End Sub
- Private Sub Form1_Load_1(sender As Object, e As EventArgs) Handles MyBase.Load
- Dim tileWidth As Integer = 30
- Dim tileHeight As Integer = 30
- Dim tileRows As Integer = 60
- Dim tileCols As Integer = 60
- Using sourceBmp As Bitmap = New Bitmap("C:\cc\mapeditor\basic.jpg")
- Dim s As Size = New Size(tileWidth, tileHeight)
- Dim destRect As Rectangle = New Rectangle(Point.Empty, s)
- For row As Integer = 0 To tileRows - 1
- For col As Integer = 0 To tileCols - 1
- Dim p As PictureBox = New PictureBox()
- p.Size = s
- Dim loc As Point = New Point(tileWidth * col, tileHeight * row)
- Dim srcRect As Rectangle = New Rectangle(loc, s)
- Dim tile As Bitmap = New Bitmap(tileWidth, tileHeight)
- Dim G As Graphics = Graphics.FromImage(tile)
- G.DrawImage(sourceBmp, destRect, srcRect, GraphicsUnit.Pixel)
- p.Image = tile
- p.Location = loc
- p.Tag = loc
- p.Name = String.Format("Col={0:00}-Row={1:00}", col, row)
- Me.Controls.Add(p)
- Next
- Next
- End Using
- End Sub
-
Kann mir dabei jemand helfen? Wäre super!
~Wir leben zwar alle unter dem gleichen Himmel, aber es haben nicht alle den gleichen Horizont~