ImageButton, bei klick austauschen!?

Anfängerfragen zum Programmieren mit PureBasic.
Ractur
Beiträge: 128
Registriert: 24.06.2008 11:51

ImageButton, bei klick austauschen!?

Beitrag von Ractur »

Hallo,

kann mir mal jemand ein Tip geben, ich möchte bei Mausklick das Image austauschen.

Ich hab hier im Forum ellenlange Codes gesehen, das muss doch auch einfacher gehen? Das kann doch nicht so schwer sein das wenn ich:

BildA
nach Mausklick
BildB

austausche.

Ich hatte es einfach mal versucht einfach ein neuen Button "drüber" zu machen wenn ein Mausklick erfolgt. Allerdings funktioniert das nicht...

Grüsse Matthias
Benutzeravatar
RSBasic
Admin
Beiträge: 8047
Registriert: 05.10.2006 18:55
Wohnort: Gernsbach
Kontaktdaten:

Beitrag von RSBasic »

Code: Alles auswählen

CreateImage(1,50,50,32)
CreateImage(2,50,50,32)

StartDrawing(ImageOutput(1))
  Box(0,0,50,50,RGB(0,0,100))
StopDrawing()
StartDrawing(ImageOutput(2))
  Box(0,0,50,50,RGB(0,0,200))
StopDrawing()

If OpenWindow(0,0,0,500,250,"Window",#PB_Window_SystemMenu|#PB_Window_ScreenCentered)
  If CreateGadgetList(WindowID(0))
    ButtonImageGadget(1,100,100,50,50,ImageID(1),0)
  EndIf
Repeat
EventID=WaitWindowEvent()
If EventID=#PB_Event_Gadget
  Select EventGadget()
    Case 1
      SetGadgetAttribute(1,#PB_Button_Image,ImageID(2))
  EndSelect
EndIf
Until EventID = #PB_Event_CloseWindow
EndIf
:?:
Aus privaten Gründen habe ich leider nicht mehr so viel Zeit wie früher. Bitte habt Verständnis dafür.
Bild
Bild
Ractur
Beiträge: 128
Registriert: 24.06.2008 11:51

Beitrag von Ractur »

Hi,

"SetGadgetAttribute" war das was ich gesucht habe :) Recht herzlichen Dank für den Beispielcode noch oben drein :allright: Danke Dir !
Häns
Beiträge: 47
Registriert: 27.10.2007 14:30
Wohnort: Kölle

Beitrag von Häns »

@RSBasic:

Bei deinem Beispiel bekomme ich die Fehlermeldung, dass in ButtonImageGadget die Parameter #PB_Button_Image nicht stimmen:

Code: Alles auswählen

Case 1
      SetGadgetAttribute(1,#PB_Button_Image,ImageID(2))
  EndSelect
Handelt sich in deinem Beispiel um eine ältere PB-Version? ButtonGadgetImage unterstützt in meiner Version keine Attribute...
Ocder habe ich etwas übersehen?

Gruß,
Häns
PB 5.6
Windows 7 Professional
Kaeru Gaman
Beiträge: 17389
Registriert: 10.11.2004 03:22

Beitrag von Kaeru Gaman »

> Handelt sich in deinem Beispiel um eine ältere PB-Version?

nein, aber bei deiner Version handelt es sich um eine ältere.


für 4.1 musst du den code eben umschreiben, schau halt in die Help zu ButtonImageGadget.
Der Narr denkt er sei ein weiser Mann.
Der Weise weiß, dass er ein Narr ist.
Häns
Beiträge: 47
Registriert: 27.10.2007 14:30
Wohnort: Kölle

Beitrag von Häns »

@Kaeru:

alles klar! Danke :)

Hans
PB 5.6
Windows 7 Professional
Antworten