Seite 1 von 1

[Gelöst] Geklicktes Imagegadget ermitteln?

Verfasst: 07.07.2013 22:31
von TheNewOne
Hallo zusammen,
ich habe da mal eine Frage. Ich habe einige ImageGadgets, und nun möchte ich ermitteln auf welches ImageGadget der Benutzer geklickt hat.

Code: Alles auswählen

Select EventType()
  Case #PB_EventType_LeftClick
EndSelect
Also damit kann ich da den Klick ermitteln, aber wie kann ich jetzt wissen auf welches genau geklickt wurde?
Vielleicht kann mir ja jemand helfen. :)

Re: Geklicktes Imagegadget ermitteln?

Verfasst: 07.07.2013 22:33
von RSBasic

Code: Alles auswählen

EnableExplicit

Define EventID
Define EventGadget

CreateImage(1, 100, 100)

If OpenWindow(0, 0, 0, 500, 400, "Window", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
  ImageGadget(1, 50, 50, 0, 0, ImageID(1), 0)
  ImageGadget(2, 200, 50, 0, 0, ImageID(1), 0)
  ImageGadget(3, 50, 200, 0, 0, ImageID(1), 0)
  ImageGadget(4, 200, 200, 0, 0, ImageID(1), 0)
  
  Repeat
    EventID = WaitWindowEvent()
    If EventID = #PB_Event_Gadget
      EventGadget = EventGadget()
      Debug "Gadget: " + Str(EventGadget)
      Select EventGadget
        Case 1
          
      EndSelect
    EndIf
    If EventID = #PB_Event_CloseWindow
      End
    EndIf
  ForEver
EndIf

Re: Geklicktes Imagegadget ermitteln?

Verfasst: 07.07.2013 23:35
von TheNewOne
Vielen Dank RSBasic :D