Box()

Syntax

Box(x, y, Breite, Höhe [, Farbe])

Zeichnet einen ausgefüllten Kasten in der angegebenen Größe auf dem aktuellen Ausgabekanal. Wenn der optionale Parameter 'Farbe' nicht verwendet wird, benutzt PureBasic die mittels FrontColor() festgelegte Zeichenfarbe. RGB() kann zum Ermitteln eines gültigen Farbwertes benutzt werden. Der aktuelle Ausgabekanal wird mittels StartDrawing() festgelegt.

Beispiel:

  ; Mehrere Boxen in zufälligen Farben
  Width=200
  Height=150
  If OpenWindow(0, 0, 0, Width, Height, #PB_Window_SystemMenu|#PB_Window_ScreenCentered, "Boxes")
    If StartDrawing(WindowOutput())
      y = 0
      #StepX = 10
      StepY = Round(#StepX*Height/Width, 0)
      For x = 0 To Width/2-5 Step #StepX
        Box(x, y, Width-2*x, Height-2*y ,RGB(Random(255),Random(255),Random(255)))
        y + StepY     ; entspricht y = y + StepY
      Next x
      StopDrawing()   ; Dies ist nach Abschluss der Zeichenoperationen immer nötig!!! Vergessen Sie dies nie!
    EndIf
    
    Repeat : EventID = WaitWindowEvent() : Until  EventID = #PB_Event_CloseWindow
  EndIf

Unterstützte OS

All