Seite 1 von 1

OpenWindowedScreen

Verfasst: 02.04.2006 14:07
von pjanfred
Wiso geht das nicht?

Code: Alles auswählen

InitSprite()

If OpenWindow(0,0,0,500,500,#PB_Window_ScreenCentered|#PB_Window_BorderLess,"Screen on Scrollarea") And CreateGadgetList(WindowID(0))
  CreateGadgetList(WindowID(0))
  OpenWindowedScreen(0,0,0,500,500,0,0,0)
  CloseGadgetList()
  Repeat
    FlipBuffers()
    ClearScreen (0,0,0)
    Select WaitWindowEvent()
      Case  #PB_Event_CloseWindow
        End
    EndSelect
  ForEver
EndIf   

Verfasst: 02.04.2006 14:16
von ts-soft
2 Fehler:

Code: Alles auswählen

InitSprite()

If OpenWindow(0,0,0,500,500,#PB_Window_ScreenCentered|#PB_Window_BorderLess,"Screen on Scrollarea") And CreateGadgetList(WindowID(0))
  OpenWindowedScreen(WindowID(0),0,0,500,500,0,0,0)
   Repeat
    FlipBuffers()
    ClearScreen (0,0,0)
    Select WaitWindowEvent()
      Case  #PB_Event_CloseWindow
        End
    EndSelect
  ForEver
EndIf   

Verfasst: 02.04.2006 14:25
von Deeem2031
Hm, und warum zweimal "CreateGadgetList(WindowID(0))" ?

Verfasst: 02.04.2006 14:33
von ts-soft
Hab ich garnicht gesehen, weils in einer Zeile steht :freak:

Korrigiere: 3 Fehler

Source oben angepaßt

Verfasst: 02.04.2006 18:02
von Kaeru Gaman
warum machen alle ne Gadgetlist auf, wenn se keine Gadgets haben?

der WindowedScreen ist kein Gadget!

Verfasst: 02.04.2006 20:20
von freedimension
@pjanfred: Ich hatte es dir ja schonmal als PN gesagt, jetzt versuche ich es aber doch einmal über die öffentliche Demütigung ;)

Das Forum "Allgemein" ist für solche Anfragen das falsche Forum, wir haben nicht umsonst einen Anfänger-Bereich

Verschoben nach "Anfänger"

Verfasst: 03.04.2006 15:22
von pjanfred
Gibt es besodere Regeln mit denen ich weis wo hin es kommt?
Hir noch eine Frage warum wird das bild nicht angezeigt?

Code: Alles auswählen

InitSprite()
LoadSprite(1,"aus.bmp",0)
If OpenWindow(0,0,0,710,365,#PB_Window_ScreenCentered|#PB_Window_BorderLess,"Screen on Scrollarea") And CreateGadgetList(WindowID(0))
  OpenWindowedScreen(WindowID(0),0,0,710,330,0,0,0)
  
  ProgressBarGadget(0, 0,335,710, 30, 0,100)
  
  
  Repeat
    
    DisplaySprite(1,0,0)
    ClearScreen(0,0,0)
  
    FlipBuffers()
    Select WindowEvent()
      
      Case  #PB_Event_CloseWindow
        End
    EndSelect
    state+1
    Delay(100)
    SetGadgetState(0, state)   ; wir setzen die erste ProgressBar (ID = 0) auf 50 von 100
  Until state > 100
EndIf   

Verfasst: 03.04.2006 19:46
von freedimension
pjanfred hat geschrieben:Gibt es besodere Regeln mit denen ich weis wo hin es kommt?
Ja! Du Anfänger, das hier Anfängerforum. Die Schlussfolgerungen triffst bitte du! ;)

Verfasst: 04.04.2006 12:18
von HeX0R
pjanfred hat geschrieben:Hir noch eine Frage warum wird das bild nicht angezeigt?
Weil du erst das Sprite anzeigst und gleich darauf per ClearScreen() alles wieder überpinselst.