DESCRIPTION.

La procédure PROC_PLline() trace une ligne entre les deux dont les coordonnées sont fournies.

SYNTAXE.

PROC_PLline( debut_x , debut_y , fin_x , fin_y )

REMARQUES.

debut_x doit être un nombre entier, exprimé en pixels, et indiquant l'abscisse du point de départ de la ligne, par rapport au bord gauche de la feuille.

debut_y doit être un nombre entier, exprimé en pixels, et indiquant l'ordonnée du point de départ de la ligne, par rapport au bord bas de la feuille.

fin_x doit être un nombre entier, exprimé en pixels, et indiquant l'abscisse du point d'arrivée de la ligne, par rapport au bord gauche de la feuille.

fin_y doit être un nombre entier, exprimé en pixels, et indiquant l'ordonnée du point d'arrivée de la ligne, par rapport au bord bas de la feuille.

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_PLline() est importée depuis le module pdflib.bbc. 

EXEMPLE.

INSTALL @lib$ + "pdflib.bbc"

FOR kligne = 1 TO 10 

kodonnee =  50 + ( kligne * 10 ) : REM - calcule l'ordonnee de la ligne

PROC_PLcolour( 0 , 1 , &00100000 ) : REM - modifie la couleur et l'épaisseur de la ligne

PROC_PLline( 25 , kodonnee , 170 , kodonnee ) : REM - trace la ligne

NEXT kligne

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