DESCRIPTION.

La procédure PROC_PLcircle() dessine un cercle, vide ou plein, sur le document.

SYNTAXE.

PROC_PLcircle( abscisse , ordonnee , rayon , remplissage )

REMARQUES.

abscisse doit être un nombre entier, exprimé en pixels, et indiquant l'abscisse du centre du cercle, par rapport au bord gauche de la feuille.

ordonnee doit être un nombre entier, exprimé en pixels, et indiquant l'ordonnée du centre du cercle, par rapport au bord bas de la feuille.

rayon doit être un nombre entier, exprimé en pixels, et indiquant le rayon du cercle.

remplissage doit être 0, pour dessiner une rectangle vide, ou 1 pour dessiner un rectangle plein de la couleur actuellement sélectionnée.

.

Rappel : L'unité par défaut est le pixel, avec 1 pixel = 0,35278 mm et donc 1 mm égal environ 2,84 pixels. Les dimensions du document créé sont au format standardisé du A4 soit 210 x 297 mm. Pour basculer l'unité de mesure par défaut en millimètre, utilisez la procédure PROC_PLcolour() avec la valeur &00100000 pour style, en troisième paramètre. Dans ce cas les valeurs des ordonnées vont du haut du document (0 mm) au bas du document ( 297 mm), les valeurs des abscisses restent inchangées de gauche (0 mm) à droite (210 mm).

Rappel : la fonction FN_PLcreatepdf() doit être appelée pour placer les modifications sur le document .pdf en cours de création.

La procédure PROC_PLcircle() est importée depuis le module pdflib.bbc. 

EXEMPLE.

INSTALL @lib$ + "pdflib.bbc"

PROC_PLcolour( &8fbc8f , 2 , &00100000 ) : REM - modifie la couleur et l'épaisseur de la ligne

PROC_PLcircle( 70 , 80 , 30 , 0 ) : REM - trace un cercle vide

PROC_PLcircle( 140 , 80 , 30 , 1 ) : REM - trace un cercle plein

kfichier$ = @tmp$ + "test.pdf"

ketat = FN_PLcreatepdf( kfichier$ ) : REM - cree et enregistre le document

IF ketat <> 0 THEN PRINT "Vous pouvez ouvrir " ;  kfichier$ ELSE PRINT "Le document n'a pu etre cree !"

END