Lazarus TImage - Tracé de courbe (Pascal)

Fermé
Rickz - 8 mai 2012 à 21:37
KX Messages postés 16734 Date d'inscription samedi 31 mai 2008 Statut Modérateur Dernière intervention 24 avril 2024 - 8 mai 2012 à 23:01
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.
A voir également:

1 réponse

KX Messages postés 16734 Date d'inscription samedi 31 mai 2008 Statut Modérateur Dernière intervention 24 avril 2024 3 015
Modifié par KX le 8/05/2012 à 21:52
Tu peux convertir un réel en entier avec la fonction INT(x:Real):Integer
La confiance n'exclut pas le contrôle
0
mais les valeurs seront faussées ?
0
KX Messages postés 16734 Date d'inscription samedi 31 mai 2008 Statut Modérateur Dernière intervention 24 avril 2024 3 015
8 mai 2012 à 22:44
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
ok merci pour la réponse. y'aurait -il pas d'autres methodes pour tracer une courbe?
0
KX Messages postés 16734 Date d'inscription samedi 31 mai 2008 Statut Modérateur Dernière intervention 24 avril 2024 3 015
8 mai 2012 à 23:01
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