OpenWindowedScreen

[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   

[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   

[Deeem2031]

Hm, und warum zweimal "CreateGadgetList(WindowID(0))" ?

[ts-soft]

Hab ich garnicht gesehen, weils in einer Zeile steht

Korrigiere: 3 Fehler

Source oben angepaßt

[Kaeru Gaman]

warum machen alle ne Gadgetlist auf, wenn se keine Gadgets haben?

der WindowedScreen ist kein Gadget!

[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"

[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   

[freedimension]

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!

[HeX0R]

Hir noch eine Frage warum wird das bild nicht angezeigt?

Weil du erst das Sprite anzeigst und gleich darauf per ClearScreen() alles wieder überpinselst.