SpinGadget - Bug?

[Falko]

Dann könnte Fred das doch vielleicht verbessern, indem er das von diesem
Source übernimmt. Damit kann man weit höhere Grenzen setzen und
die Begrenzung aufheben

http://www.purebasic.fr/english/viewtop ... 594#181594

[edel]

Dann wuerde er aber Systeme ohne min. IE 5 ausschliessen.

[Falko]

Dann wuerde er aber Systeme ohne min. IE 5 ausschliessen.

Verstehe ich nun nicht ganz, was du damit meinst.

http://msdn.microsoft.com/en-us/library ... S.85).aspx

Aber wenn ich das richtig gelesen habe, geht das auch noch mit IE 4.

Minimum operating systems Windows 2000, Windows NT 4.0 with Internet Explorer 4.0, Windows 98, Windows 95 with Internet Explorer 4.0

[edel]

Fuer den vollen Funktionsumfang wird es dann aber doch IE5. Zumindest habe ich das so verstanden.

[HeX0R]

Wer benutzt denn ein Spingadget für >10000 Werte ?
Da eh kein halbwegs denkender User die Werte von 0 bis 10000 tatsächlich mit den Pfeilbuttons nach oben klicken würde, nimmt man doch eher ein Stringgadget, setzt ein Zeichenlimit und auf Numeric.

[ts-soft]

Wer benutzt denn ein Spingadget für >10000 Werte ?
Da eh kein halbwegs denkender User die Werte von 0 bis 10000 tatsächlich mit den Pfeilbuttons nach oben klicken würde, nimmt man doch eher ein Stringgadget, setzt ein Zeichenlimit und auf Numeric.

Das hab ich auch die ganze Zeit gedacht.
Ein Trackbargadget + Textgadget wäre auch eine sinnvolle Kombination,
aber ein SpinGadget, wo ich 2 Wochen den MausButton drauf drücke, finde
ich auch nicht so sinnvoll

[hardfalcon]

Alles eine Frage der Ausdauer . Wer weiß, vielleicht wird das irgendwann mal eine olympische Disziplin (und Magnesium gegen Fingerkrämpfe kommt auf die Dopingliste)...

[kswb73]

Alles eine Frage der Ausdauer Wink . Wer weiß, vielleicht wird das irgendwann mal eine olympische Disziplin (und Magnesium gegen Fingerkrämpfe kommt auf die Dopingliste)...

Na, aber nicht mit Code für's SpinGadget. Gleich zwei "Cheat-Möglichkeiten", dafür sind aber auch gigantische Werte möglich (von -9223372036854775808 bis +9223372036854775807), damits auch wirklich keinen erhlichen Sieger gibt. (nagut, vielleicht nach ein paar Jahren )

Code: Alles auswählen

Wert.q=0
If OpenWindow(0,0,0,100,40,"Window",#PB_Window_SystemMenu|#PB_Window_ScreenCentered)
  If CreateGadgetList(WindowID(0))
    SpinGadget(1,10,10,100,20,1,60000,0)
  EndIf
  SetGadgetText(1,"1")
  SetGadgetState(1,1)
Repeat
EventID=WaitWindowEvent()
If EventID=#PB_Event_Gadget
  Select EventGadget()
    Case 1
      If EventType()=1
      Wert+1
        If Wert>GetGadgetAttribute(1,#PB_Spin_Maximum)
        Wert=GetGadgetAttribute(1,#PB_Spin_Minimum)
        EndIf
      SetGadgetText(1,Str(Wert))
      ElseIf EventType()=-1
      Wert-1
        If Wert<GetGadgetAttribute(1,#PB_Spin_Minimum)
        Wert=GetGadgetAttribute(1,#PB_Spin_Maximum)
        EndIf
      SetGadgetText(1,Str(Wert))
      ElseIf EventType()=#PB_EventType_Change 
      Wert=Val(GetGadgetText(1))
        If Wert>GetGadgetAttribute(1,#PB_Spin_Maximum)
        Wert=GetGadgetAttribute(1,#PB_Spin_Maximum)
        ElseIf Wert<GetGadgetAttribute(1,#PB_Spin_Minimum)
        Wert=GetGadgetAttribute(1,#PB_Spin_Minimum)
        EndIf
      EndIf 
  EndSelect
EndIf
Until EventID=#PB_Event_CloseWindow
EndIf
;Entstanden aus RSBasics Code