2 Fenster gleichzeitig via CreateThread()

[ts-soft]

@HeX0R
Jetzt hab ich heute auch noch was dazugelernt

[mirca]

GELÖSCHT

[ts-soft]

Nee, höchstens als Option
Folgendes Macro löst Dein Problem:

Code: Alles auswählen

EnableExplicit

Macro mDebug
  ShowDebugOutput()
  Debug
EndMacro

Define EventID

Procedure Window1_Info()
  If OpenWindow(1, 650, 100, 400, 300, "Window 2", #PB_Window_SystemMenu)
    ButtonGadget(2, 10, 10, 100, 20, "Button 2", 0)
   
  EndIf
 
EndProcedure

If OpenWindow(0, 100, 100, 500, 400, "Window 1", #PB_Window_SystemMenu)
  ButtonGadget(1, 10, 10, 100, 20, "Button 1", 0)
 
  Window1_Info()
 
  Repeat
    EventID = WaitWindowEvent()
    If EventID = #PB_Event_Gadget
      Select EventGadget()
        Case 1
          mDebug "Button 1"
        Case 2
          mDebug "Button 2"
      EndSelect
    EndIf
    If EventID = #PB_Event_CloseWindow
      End
    EndIf
  ForEver
EndIf 

einfach immer mDebug nutzen.

[Moxl]

ahhhhh okay danke habs kapiert

[mirca]

GELÖSCHT

[ts-soft]

Functionsnamen lassen sich per Macro überschreiben, Schlüsselworte aber nicht! Mach wohl auch nur selten Sinn

[Kiffi]

Sonst muss man das immer wieder machen über das Menü.

dann lass das Fenster doch einfach offen.

[WPö]

Da fällt mir gerade auf: Moxl ist neu hier.

Willkommen hier an Bord!

Gruß - WPö

[Moxl]

Danke danke

aber ich war schonmal hier angemeldet, war aber solang nichmehr drin das ich meinen benutzternamen + pw vergessen hab

[WPö]

Ah, dann nehm' ich alles zurück und behaupte das Gegenteil...