Lazarus TImage - Tracé de courbe (Pascal)

Rickz -  
KX Messages postés 19031 Statut Modérateur -
Bonsoir,

comment fait-on pour tracer une courbe sur TImage à partir d'un tableau de valeur?
j'ai transformé les coordonnées cartesiennes en coordonnées pixels de TImage, mon souci c'est que je veux représenter les points par des petites carrés, donc j'utilise Image.Canvas.Rectangle(x1,y1,x2,y2) mais le problème c'est que cette fonction requiert quatre entiers (integer) alors que moi j'ai quatre réels (real).
Comment faire ?

merci d'avance.

1 réponse

  1. KX Messages postés 19031 Statut Modérateur 3 020
     
    Tu peux convertir un réel en entier avec la fonction INT(x:Real):Integer
    La confiance n'exclut pas le contrôle
    0
    1. Rickz
       
      mais les valeurs seront faussées ?
      0
    2. KX Messages postés 19031 Statut Modérateur 3 020
       
      Elles seront arrondies au pixel près, mais on ne peut de toute façon pas faire mieux puisque le pixel est la plus petite unité d'affichage possible !
      0
    3. Rickz
       
      ok merci pour la réponse. y'aurait -il pas d'autres methodes pour tracer une courbe?
      0
    4. KX Messages postés 19031 Statut Modérateur 3 020
       
      A part afficher les points un à un, il n'en y a pas d'autre, par contre tu utilises Image.Canvas.Rectangle qui est certainement une spécificité de Lazarus, alors qu'en Pascal pur ça existe déjà !
      Regarde ce tutoriel, en faisant tout de même attention car il s'applique à du Turbo Pascal, et il y aura surement deux ou trois trucs à modifier pour le passer sur Lazarus.
      0