Extra Fenster für Onlinehilfe

Übersicht BlitzMax, BlitzMax NG Allgemein

Neue Antwort erstellen

 

danibert

Betreff: Extra Fenster für Onlinehilfe

 BeitragFr, Mai 07, 2010 9:28
Antworten mit Zitat
Benutzer-Profile anzeigen
Hallo,

ich versuche, zusätzlich zum Fenster meiner Anwendung ein Fenster zur Anzeige der Onlinehilfe aufzumachen. Mit meinem Code bekomme ich zwar problemlos das 2 Fenster auf den Bildschirm, wenn ich dieses aber wieder schließe, wird die gesamte Anwendung beendet.
Code: [AUSKLAPPEN]
Import maxgui.drivers
Strict

Local MyWindow:TGadget=CreateWindow("ProgressBar-Beispiel", 40,40,400,400)
Local MyWindow2:TGadget=CreateWindow("ProgressBar-Beispiel", 80,80,200,200)

Repeat
 WaitEvent()
   Select EventID()
     Case EVENT_WINDOWCLOSE
     End
 End Select
Forever
End

Wie lässt sich das verhindern?
Danke im Voraus

d-bug

 BeitragFr, Mai 07, 2010 9:38
Antworten mit Zitat
Benutzer-Profile anzeigen
BlitzMax: [AUSKLAPPEN] 
Import maxgui.drivers
Strict

Local MyWindow:TGadget=CreateWindow("ProgressBar-Beispiel", 40,40,400,400)
Local MyWindow2:TGadget=CreateWindow("ProgressBar-Beispiel", 80,80,200,200)

Repeat
 WaitEvent()
   Select EventID()
      Case EVENT_WINDOWCLOSE

          Select EventSource()
             Case MyWindow
                End
             Case MyWindow2
                FreeGadget(MyWindow2)
          End Select
   End Select
Forever


Wenn du End verwendest wird die Applikation komplett beendet. Das solltest du nur tun, wenn du das Hauptfenster schließt. Mit FreeGadget kannst du das zweite Fenster einfach aus dem Speicher löschen.
 

danibert

 BeitragFr, Mai 07, 2010 10:04
Antworten mit Zitat
Benutzer-Profile anzeigen
Das funktioniert. Vielen Dank.

Neue Antwort erstellen


Übersicht BlitzMax, BlitzMax NG Allgemein

Nach Oben

Gehe zu:

Powered by phpBB © 2001 - 2006, phpBB Group