Seite 1 von 1

Meine Buttons sind nicht mehr klickbar ?!

Verfasst: 19.12.2005 20:25
von Glow
Hi

Also ich habe gerade etwas seltsames festgestellt: In meinem Prgramm welches ich gerade zum testen mache, gehen meine Buttons plötzlich nicht mehr ? Ich hab eigentlich nur an einem Hintergrundbild gebastelt, und vorher ging es auch noch. Das ganze ist ein jpg und ich hab das jetzt einfach mal ein bissel grösser gemacht, weil es vorher nur ein logo war, und jetzt mehr vom Screen ausfüllen soll. Mein Code sieht folgendermassen aus:

Code: Alles auswählen

Enumeration
  #Window_0
  #bild
  #button1
  #button2
  #button3
  #text1
EndEnumeration

UseJPEGImageDecoder()

CatchImage(0,?storlogo)

Procedure Open_Window_0()
  If OpenWindow(#Window_0, 395, 284, 302, 142,  #PB_Window_SystemMenu | #PB_Window_ScreenCentered | #PB_Window_TitleBar , "Test")
    If CreateGadgetList(WindowID())
      ImageGadget(#bild, 0,0,302,142,UseImage(0))
      ButtonGadget(#button1, 10, 115, 70, 20, "Test1")
      ButtonGadget(#button2, 90, 115, 70, 20, "Test2")
      ButtonGadget(#button3, 250, 85, 40, 20, "Test3")
      StringGadget(#text1, 10, 85, 230, 20, "",#PB_String_ReadOnly)
     EndIf
  EndIf
EndProcedure

Open_window_0()

Repeat
 
Event = WaitWindowEvent() 

Select Event
  
 Case #PB_EventGadget
 
  Select EventGadgetID()
    Case (#button1)
    MessageRequester("Test1","Test1",#PB_MessageRequester_Ok)
    Case (#button2)
    MessageRequester("Test2","Test2",#PB_MessageRequester_Ok)
    Case (#button3)
    MessageRequester("Test3","Test3",#PB_MessageRequester_Ok)
  EndSelect
  
EndSelect

Until Event= #PB_EventCloseWindow

End

DataSection
  storlogo:
  IncludeBinary "my_logo.jpg"
  storlogoend:
EndDataSection 
Ich kann das Fenster zwar verschieben und auch mit dem kleinen "x" oben rechts schliessen, aber die Buttons sind alle nicht mehr klickbar :(
wenn ich die Zeile, welches das Imagedarstellt auskommentiere, gehen die Buttons wieder. Wenn ich die Zeile ans Ende der Gadget liste packe, geht es auch, aber die Buttons verschwinden plötzlich :/
Kann mir jemand sagen woran das liegt ? Ist das ein Bug, oder ein Feature ?

Edit: *grübel* Kann es sein, daß man keine anderen Gadgets über ein image gadget legen, und vor allem benutzen kann ? Oo

Verfasst: 19.12.2005 20:37
von Hroudtwolf
Mach mal die Klammern hinter den Cases weg. :wink:

Verfasst: 19.12.2005 20:40
von Glow
Hallo

Du meinst also, anstatt:

Case (#button1)

soll man schreiben:

Case #button1

?

Das hab ich grad probiert, geht aber trotzdem nicht :(

Edit: Ok, ich hab mein altes logo nochmal reingeklatscht, welches nur eine Höhe von 80 Pixels hat, also die Gadgets nicht überschneidet - nun gehen die Buttons wieder :/ Dies würde meine Theorie, daß ein Gaget nicht über einem Image-Gadet funktioniert bestätigen...was aber natürlich etwas...hmm...doof wäre :|

Verfasst: 19.12.2005 20:52
von edel
Versuche es mal mit DisableGadget(#bild,#true) .
Als bessere Alternative :
http://forums.purebasic.com/german/viewtopic.php?t=2454

Verfasst: 19.12.2005 20:57
von Glow
OMG nun funktionierts :D Vielen Dank, der Tip war Gold wert *knutsch*.
Sollte man vieleicht in die Hilfe mit reinschreiben, daß man image gadgets deaktivieren muss um andere Gagdets drüberlegen und vor allem drauf zugreifen zu können :)

Verfasst: 19.12.2005 23:20
von Andre
Glow hat geschrieben:Sollte man vieleicht in die Hilfe mit reinschreiben, daß man image gadgets deaktivieren muss um andere Gagdets drüberlegen und vor allem drauf zugreifen zu können :)
Schon vorgemerkt. :wink: