Sinon, il existe apparemment une unité déjà existante en Pascal (uses Graph)
Hugo ETIEVANT explique son utilisation ici
Certes elle ne semble pas très performante, mais un peu est toujours mieux qu'un rien...
Voici un exemple de programme qui est donné dans ce tutoriel (légèrement modifié)
Program coquille ;
Uses Graph ;
Var r : Integer;
mode, pilote : SmallInt ;
BEGIN
mode := Detect ;
InitGraph(mode, pilote, 'c:\bp\bgi') ;
SetColor(14) ;
r := 0 ;
Repeat
Inc(r, 8) ;
Arc(GetMaxX Div 3, GetMaxY Div 2, 0, r, 180-(r Div 2)) ;
Until r>=360 ;
ReadLn ;
CloseGraph ;
END.
La confiance n'exclut pas le contrôle
