Ausgabe auf ein gezielte Fenster

[marcelx]

Hallo,

ich verwende 2 Fenstern mit OpenWindow (#Window_0 und #Window_1).
Wie steuere ich die Ausgabe (wie z.B. mit TextGadget) auf #Window_0 oder #Window_1 ?

Ich vermutte, dass es ganz einfach ist und ich habe es leider nicht hinbekommen.

Danke

[ts-soft]

Die Ausgabe erfolgt auf dem Fenster, wo sich das TextGadget befindet, insofern ist Deine Frage etwas
unklar. Ein Beispielsource könnte helfen.

Gruß
Thomas

[man-in-black]

moin,

ich vermute mal, dass du bereits 2 Fenster offen hast und nun noch ein paar Gadgets auf diesen verteilen willst,
aber einfach nicht auf Fenster1 zurück kommst. (fragt sich bloß, ob nachträgliche Gadgets sinnvoll sind)

Ergebnis = UseGadgetList(WindowID)

MFG
MIB

[marcelx]

So mein Beispiel Code:

Code: Alles auswählen

Enumeration
  #Window_1
  #Window_2
  #Txt_1
  #Txt_2
  #Txt_1a
  #Txt_2a
EndEnumeration  


If OpenWindow(#Window_1, 0, 0, 200,100, "Window_1",  #PB_Window_SystemMenu | #PB_Window_ScreenCentered | #PB_Window_TitleBar )
    TextGadget(#Txt_1, 10, 10, 50, 20, "Text 1")
EndIf


If OpenWindow(#Window_2, 0, 0, 100, 200, "Window_2",  #PB_Window_SystemMenu | #PB_Window_ScreenCentered | #PB_Window_TitleBar )
    TextGadget(#Txt_2, 10, 10, 50, 20, "Text 2")
EndIf

; diese neue Gadget auf #Window_1
TextGadget(#Txt_1a, 10, 30, 50, 20, "Text 1a")
; diese neue Gadget auf #Window_2
TextGadget(#Txt_2a, 10, 30, 50, 20, "Text 2a")

Repeat
Until WaitWindowEvent() = #PB_Event_CloseWindow
 

[marcelx]

ich vermute mal, dass du bereits 2 Fenster offen hast und nun noch ein paar Gadgets auf diesen verteilen willst,
aber einfach nicht auf Fenster1 zurück kommst.

Ganz richtig.

Gruß
MarcelX

[ts-soft]

Code: Alles auswählen

Enumeration
  #Window_1
  #Window_2
EndEnumeration

Enumeration
  #Txt_1
  #Txt_2
  #Txt_1a
  #Txt_2a
EndEnumeration

If OpenWindow(#Window_1, 0, 0, 200,100, "Window_1",  #PB_Window_SystemMenu | #PB_Window_ScreenCentered | #PB_Window_TitleBar )
    TextGadget(#Txt_1, 10, 10, 50, 20, "Text 1")
EndIf


If OpenWindow(#Window_2, 0, 0, 100, 200, "Window_2",  #PB_Window_SystemMenu | #PB_Window_ScreenCentered | #PB_Window_TitleBar )
    TextGadget(#Txt_2, 10, 10, 50, 20, "Text 2")
EndIf

; diese neue Gadget auf #Window_1
UseGadgetList(WindowID(#Window_1))
TextGadget(#Txt_1a, 10, 30, 50, 20, "Text 1a")
; diese neue Gadget auf #Window_2
UseGadgetList(WindowID(#Window_2))
TextGadget(#Txt_2a, 10, 30, 50, 20, "Text 2a")

Repeat
Until WaitWindowEvent() = #PB_Event_CloseWindow
  

Hab auch gleich die Enumeration geändert, es ist sinnvoller für jeden Objekttype eine eigene Enumeration zu nutzen, also
in diesem Falle sind es Fenster und Gadgets.

[marcelx]

Wunderbar und danke.
Ich habe was neues gelernt (UseGadgetList).
In den HTML-Hilfe ist UseGadgetList unter "PureBasic - Window" nicht vorhanden.

Gruß
MarcelX

[ts-soft]

Stimmt, ist aber vorhanden: UseGadgetList()
Gehört auch zu den Gadgets

[Kiffi]

In den HTML-Hilfe ist UseGadgetList unter "PureBasic - Window" nicht vorhanden.

UseGadgetList() befindet sich in der Gadget-Lib: PureBasic - Gadget

Grüße ... Kiffi