[5.11] SetGadgetState3d bei SrollbarGadget3d geht nicht

Hier werden, insbesondere in den Beta-Phasen, Bugmeldungen gepostet. Das offizielle BugForum ist allerdings hier.
Benutzeravatar
Makke
Beiträge: 156
Registriert: 24.08.2011 18:00
Computerausstattung: AMD Ryzen 7 5700X - AMD Radeon RX 6800 XT - 32 GB DDR4 SDRAM
Wohnort: Ruhrpott
Kontaktdaten:

[5.11] SetGadgetState3d bei SrollbarGadget3d geht nicht

Beitrag von Makke »

Wie es im Betreff steht funktioniert das nicht. Der Knopf bleibt immer beim Minimalwert stehen. Auch mit den Pfeil-Knöpfen kann man den Regler nicht verschieben.

Purebasic 5.11 32bit, Windows 7 64bit, DirectX 9

Hier noch Code, in Zeile 12 muss ggfs. der Pfad angepasst werden.

Code: Alles auswählen

EnableExplicit

Define.i quit, camera, w3d, g3d_scr1, g3d_txt1, g3d_scr2, g3d_txt2

InitEngine3D()
InitSprite()
InitKeyboard()
InitMouse()

If OpenWindow(0, 0, 0, 1024, 768, "Purebasic", #PB_Window_SystemMenu|#PB_Window_ScreenCentered)
  If OpenWindowedScreen(WindowID(0), 0, 0, WindowWidth(0), WindowHeight(0), 0, 0, 0, #PB_Screen_WaitSynchronization)
    Add3DArchive("..\PureBasic\Examples\3D\Data\GUI", #PB_3DArchive_FileSystem) ; <- Pfad ggfs. anpassen
  Else
    Debug "Error, can not open screen in a window"
  EndIf
EndIf

SetGUITheme3D("TaharezLook", "DejaVuSans-10")

w3d = OpenWindow3D(#PB_Any, 0, 0, 600, 300, "3D Window")
If IsWindow3D(w3d)
  g3d_scr1 = ScrollBarGadget3D(#PB_Any, 20, 20, 400, 25, 0, 20, 20)
  g3d_txt1 = StringGadget3D(#PB_Any, 450, 20, 100, 25, "")
  g3d_scr2 = ScrollBarGadget3D(#PB_Any, 20, 60, 400, 25, 50, 100, 100)
  g3d_txt2 = StringGadget3D(#PB_Any, 450, 60, 100, 25, "")
  SetGadgetState3D(g3d_scr1, 10)
  SetGadgetState3D(g3d_scr2, 100)
EndIf

camera = CreateCamera(#PB_Any, 0, 0, 100, 100)

ShowGUI(255, 1)

Repeat
  
  While WindowEvent() : Wend
  
  If ExamineKeyboard()
    If KeyboardReleased(#PB_Key_Escape)
      quit = #True
    EndIf
  EndIf
  
  If ExamineMouse()
    InputEvent3D(MouseX(), MouseY(), MouseButton(#PB_MouseButton_Left)) 
  EndIf
  
  SetGadgetText3D(g3d_txt1, Str(GetGadgetState3D(g3d_scr1)))
  SetGadgetText3D(g3d_txt2, Str(GetGadgetState3D(g3d_scr2)))
  
  RenderWorld()
  
  FlipBuffers()
  
Until quit = #True
Zuletzt geändert von Makke am 07.08.2013 17:22, insgesamt 2-mal geändert.
---
Windows 11 (64 bit)
Benutzeravatar
ts-soft
Beiträge: 22292
Registriert: 08.09.2004 00:57
Computerausstattung: Mainboard: MSI 970A-G43
CPU: AMD FX-6300 Six-Core Processor
GraKa: GeForce GTX 750 Ti, 2 GB
Memory: 16 GB DDR3-1600 - Dual Channel
Wohnort: Berlin

Re: [5.11] SetGadgetState3d bei SrollbarGadget3d geht nicht

Beitrag von ts-soft »

Das Beispiel Gadget3D.pb aus den 3D examples funktioniert hier einwandfrei.
Getested mit PB5.20B8 (Bugmeldungen sind nur zur aktuellen Version (auch wenn
es nur eine Beta ist) sinnvoll, da diese nur in aktuellen Versionen behoben werden).

Gruß
Thomas
PureBasic 5.73 LTS | SpiderBasic 2.30 | Windows 10 Pro (x64) | Linux Mint 20.1 (x64)
Nutella hat nur sehr wenig Vitamine. Deswegen muss man davon relativ viel essen.
Bild
Benutzeravatar
Chimorin
Beiträge: 451
Registriert: 30.01.2013 16:11
Computerausstattung: MSI GTX 660 OC mit TwinFrozr III
6Gb DDR 3 RAM
AMD Phenom II X4 B55 @ 3,6GHz
Windows 7 Home Premium 64-bit

Re: [5.11] SetGadgetState3d bei SrollbarGadget3d geht nicht

Beitrag von Chimorin »

Kannst du uns einen Code präsentieren? Mit Code lässt sich alles einfacher nachvollziehen ;)
Bild

- formerly known as Bananenfreak -
Antworten