.NET - 3D Würfel mit Farbe füllen
Hallo Leute,
ich habe mir einen Würfel mit folgendem Code gezeichnet:
Klappt alles wunderbar, jetzt hab ich aber das Problem mit den kleinen Würfelflächen. Ich würde die gerne mit beliebigen Farben füllen, komme aber nicht wirklich weiter.
Später soll der Würfel dann auch noch ein wenig animiert werten.
Gehe ich an die Sache komplett falsch ran oder habt ihr Lösungsvorschläge. Ich würde mir nämlich gerne einen animierten Zauberwürfel (Zauberwürfel) zusammenprogrammieren, den man auch drehen kann und so weiter
Habe auch irgendwas mit WPF-Programm mitbekommen, damit habe ich aber überhaupt keine Erfahrung 
Vielen Dank für jeden hilfreichen Post hier,
Jannik
Hallo Leute,
ich habe mir einen Würfel mit folgendem Code gezeichnet:
PHP:
Private Sub Form1_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Me.Paint
Dim pen As Pen = New Pen(Color.Black, 2)
Dim GR As Graphics = e.Graphics
'9 Würfel vorne
GR.DrawRectangle(pen, 200, 200, 75, 75)
GR.DrawRectangle(pen, 200, 275, 75, 75)
GR.DrawRectangle(pen, 200, 350, 75, 75)
GR.DrawRectangle(pen, 275, 200, 75, 75)
GR.DrawRectangle(pen, 275, 275, 75, 75)
GR.DrawRectangle(pen, 275, 350, 75, 75)
GR.DrawRectangle(pen, 350, 200, 75, 75)
GR.DrawRectangle(pen, 350, 275, 75, 75)
GR.DrawRectangle(pen, 350, 350, 75, 75)
'Diagonale Rechts 1
GR.DrawLine(pen, 425, 425, 463, 387)
GR.DrawLine(pen, 425, 350, 463, 312)
GR.DrawLine(pen, 425, 275, 463, 237)
GR.DrawLine(pen, 425, 200, 463, 162)
GR.DrawLine(pen, 463, 387, 463, 162)
'Diagonale Rechts 2
GR.DrawLine(pen, 463, 387, 502, 349)
GR.DrawLine(pen, 463, 312, 502, 274)
GR.DrawLine(pen, 463, 237, 502, 199)
GR.DrawLine(pen, 463, 161, 502, 124)
GR.DrawLine(pen, 502, 349, 502, 124)
'Diagonale Rechts 3
GR.DrawLine(pen, 502, 349, 540, 311)
GR.DrawLine(pen, 502, 274, 540, 236)
GR.DrawLine(pen, 502, 199, 540, 161)
GR.DrawLine(pen, 502, 123, 540, 86)
GR.DrawLine(pen, 540, 311, 540, 86)
'Oben
GR.DrawLine(pen, 200, 200, 314, 86)
GR.DrawLine(pen, 275, 200, 389, 86)
GR.DrawLine(pen, 350, 200, 464, 86)
GR.DrawLine(pen, 314, 86, 540, 86)
GR.DrawLine(pen, 276, 124, 501, 124)
GR.DrawLine(pen, 238, 161, 463, 161)
End Sub
Klappt alles wunderbar, jetzt hab ich aber das Problem mit den kleinen Würfelflächen. Ich würde die gerne mit beliebigen Farben füllen, komme aber nicht wirklich weiter.
Später soll der Würfel dann auch noch ein wenig animiert werten.
Gehe ich an die Sache komplett falsch ran oder habt ihr Lösungsvorschläge. Ich würde mir nämlich gerne einen animierten Zauberwürfel (Zauberwürfel) zusammenprogrammieren, den man auch drehen kann und so weiter
Vielen Dank für jeden hilfreichen Post hier,
Jannik