Circle()

Syntaxe

Circle(x, y, Rayon [, Couleur])

Dessine un cercle coloré de dimension 'Rayon' à la position x,y sur la surface de dessin en cours. Si le paramètre 'Couleur' n'est pas spécifié, la couleur fixée par la fonction FrontColor() sera utilisée. La fonction RGB() peut être utilisée pour obtenir facilement la couleur désirée. La surface de dessin est fixée par la fonction StartDrawing().

Exemple:

  ; Plusieurs cercles de couleur aléatoire
  Largeur=200
  Hauteur=150 
  If OpenWindow(0, 0, 0, Largeur, Hauteur, "Cercles", #PB_Window_SystemMenu | #PB_Window_ScreenCentered)
    If StartDrawing(WindowOutput(0))
      x = Largeur/2
      y = Hauteur/2
      For Rayon = Hauteur/2 To 10 Step -10
        Circle(x, y, rayon ,RGB(Random(255),Random(255),Random(255)))
      Next Rayon
      StopDrawing() ; C'est absolument indispensable quand les opérations de dessins sont terminées !!! Ne jamais l'oublier !
    EndIf
    
    Repeat : Event = WaitWindowEvent() : Until  Event = #PB_Event_CloseWindow
  EndIf

OS Supportés

Tous