PureBoard

Verfasst: **13.01.2006 23:52**

Hallo,

weiß jemand wie ich an den jeweiligen Inhalt des EditorGadgets komme
wenn auf "Absenden" geklickt wird?

Die GadgetIDs für PopUp/Gadget müssen in diesem Falle leider
immer dynamisch vergeben werden...

Code: Alles auswählen

Enumeration

#Freunde
  
EndEnumeration

OpenWindow(0,320,240,160,150,#PB_Window_SystemMenu,"")

CreateGadgetList(WindowID())

ListIconGadget(#Freunde,10,10,140,140,"",130)
AddGadgetItem(#Freunde,-1,"Alfons")
AddGadgetItem(#Freunde,-1,"Berta")
AddGadgetItem(#Freunde,-1,"Cärsar")

Repeat

			EventID = WaitWindowEvent()

			; jeweiliges PopUp schließen bzw. Ende bei Hauptfenster
			
			If EventID=#PB_Event_CloseWindow:If EventWindowID()=0:End:EndIf:CloseWindow(EventWindowID()):EndIf
			
			; Absenden wurde gedrückt
			
			If EventID=#PB_Event_Gadget And EventType()=#PB_EventType_LeftClick And EventGadgetID()<>#Freunde

			Debug "gadget id absenden = "+Str(EventGadgetID())
			Debug "fenster id = "+Str(EventWindowID())
			Debug "fenster titel = "+GetWindowTitle(EventWindowID())
			
			CloseWindow(EventWindowID())
			EndIf
						
			; neues PopUp öffnen
			
			If EventID=#PB_Event_Gadget And EventGadgetID()=#Freunde And EventType()=#PB_EventType_LeftDoubleClick And GetGadgetState(#Freunde)>=0
  
            aktuell.l=OpenWindow(#PB_Any,100,100,220,125,#PB_Window_SystemMenu,"Nachrichten an "+GetGadgetText(#Freunde),WindowID(0))
            
            Debug aktuell
            
            CreateGadgetList(WindowID(aktuell)):UseGadgetList(WindowID(aktuell))
            eingabe.l = EditorGadget(#PB_Any,5,5,210,90)
            
            Debug eingabe
            
            SetGadgetText(eingabe,Str(aktuell.l))
            absenden.l = ButtonGadget(#PB_Any,5,100,210,20,"Nachricht absenden")
           
            Debug absenden
            
     EndIf
     
ForEver

Eine Idee wäre wohl bei jedem PopUp einen Eintrag in einer LL mit der FensterID + GadgetID von EditorGadget + Absenden zu machen?

Verfasst: **14.01.2006 12:07**

Eine Idee wäre wohl bei jedem PopUp einen Eintrag in einer LL mit der FensterID + GadgetID von EditorGadget + Absenden zu machen?

Du hast es erfasst.

PureBoard

Inhalt eines EditorGadgets in einem Childwindow auslesen

Inhalt eines EditorGadgets in einem Childwindow auslesen