Hallo,
Irrlicht-Anfänger und VB.NET-Umsteiger (von VB6) benötigt Eure Hilfe bei der Erstellung einer IrrlichtGUI:
Ich arbeiten mit dem Irrlicht.NET CP Wrapper in VB2005 und habe versucht, das "Tutorial 5: User Interface" anzupassen.
Ich möchte ein mehrseitiges Spielmenü erstellen: Wenn man im Hauptmenü z. B. auf Optionen klickt, sollen die Buttons der ersten Seite verschwinden, und andere Buttons angezeigt werden. Hierzu habe ich versucht (ein neues?) GUIEnironment definiert, an dem die Buttons der zweiten Seite sind.
Wenn ich das Programm laufen lasse, sehe ich die Buttons der zweiten Seite im Vordergrund (halbtransparent), die Buttons der ersten Seite scheinen von hinten durch.
Kann mir jemand auf die Sprünge helfen?
Danke,
Tristan78
Code:
...
Dim mmenu As GUIEnvironment = device.GUIEnvironment
Dim opmenu As GUIEnvironment = device.GUIEnvironment
....
Dim img As GUIElement = mmenu.AddImage(driver.GetTexture("irrlichtlogo.jpg"), New Position2D(10, 10), False, mmenu.RootElement, 0, "")
mmenu.AddButton(New Rect(New Position2D(270, 110), New Position2D(530, 170)), mmenu.RootElement, 101, "Neues Spiel")
mmenu.AddButton(New Rect(New Position2D(270, 190), New Position2D(530, 250)), mmenu.RootElement, 102, "Laden")
mmenu.AddButton(New Rect(New Position2D(270, 270), New Position2D(530, 330)), mmenu.RootElement, 103, "Speichern")
mmenu.AddButton(New Rect(New Position2D(270, 350), New Position2D(530, 410)), mmenu.RootElement, 104, "Optionen")
mmenu.AddButton(New Rect(New Position2D(270, 430), New Position2D(530, 490)), mmenu.RootElement, 105, "Credits")
mmenu.AddButton(New Rect(New Position2D(270, 510), New Position2D(530, 570)), mmenu.RootElement, 106, "Beenden")
...
Dim opimg As GUIElement = opmenu.AddImage(driver.GetTexture("irrlichtlogo.jpg"), New Position2D(10, 10), False, opmenu.RootElement, 0, "")
opmenu.AddButton(New Rect(New Position2D(270, 110), New Position2D(530, 170)), opmenu.RootElement, 107, "VideoTreiber")
opmenu.AddButton(New Rect(New Position2D(270, 190), New Position2D(530, 250)), opmenu.RootElement, 108, "Auflösung")
opmenu.AddButton(New Rect(New Position2D(270, 270), New Position2D(530, 330)), opmenu.RootElement, 109, "Lautstärke")
opmenu.AddButton(New Rect(New Position2D(270, 350), New Position2D(530, 410)), opmenu.RootElement, 110, "Tastenbelegung")
opmenu.AddButton(New Rect(New Position2D(270, 430), New Position2D(530, 490)), opmenu.RootElement, 111, "Joystick")
opmenu.AddButton(New Rect(New Position2D(270, 510), New Position2D(530, 570)), opmenu.RootElement, 112, "zurück")
...
[/code]
Anmelden
Registrieren
FAQ
Suche
