Per prima cosa bisognare inserire un TImage nel progetto.

Per disegnare Linee servono due procedure :
--Codice Sorgente-----------
Image.Canvas.Moveto(X,Y); {Per dire al computer da dove far partire la linea}
Image.Canvas.Lineto(X,Y); {Per dire al computer dove termina la linea e dove inizia la prossima}
----------------------------

Per disegnare Linee curve serve una semplice procedura :
--Codice Sorgente------------
Image.Canvas.PolyBezier([Point(X1,Y1),Point(X2,Y2),Point(X3,Y3),Point(X4,Y4)]);
-----------------------------
Questa procedura è un più complicata della precedente però con un di pratica si impara.
Allora le 8 variabili che ho messo hanno questi significati :
X1,Y1,X2,Y2 : Coordinate della linea non curva
X3,Y3,X4,Y4 : Coordinate dei due punti che fanno curvare la linea.

Per disegnare Rettangoli serve la più semplice delle procedure :
--Codice Sorgente-------------
Image.Rectangle(X1,Y1,X2,Y2);
------------------------------
In questa procedura le variabili hanno i seguenti significati :
X1,Y1 : Sono le coordinate del punto in alto-sinistra del rettangolo,
X2,Y2 : Sono le coordinate del punto in basso-destra del rettangolo

Per disegnare ellissi :
--Codice Sorgente-------------
Image.Ellipse(X1,Y1,X2,Y2);
------------------------------
Significato Variabili:
X1,Y1,X2,Y2 : sono le coordinate del rettangolo in cui l'ellisse è iscritta

Per disegnare rettangoli con gli angoli arrotondati :
--Codice Sorgente-------------
Image.Canvas.RoundRect(X1,Y1,X2,Y2,(X1-X2) div 2,(Y1 - Y2) div 2);
------------------------------
Significato Variabili:
X1,Y1,X2,Y2 : sono le coordinate del rettangolo in cui l'ellisse è iscritta


Spero di essere stato chiaro, in ogni caso tutto quello che e scritto qui e anche di più lo trovate in :
http://www.pierotofy.it/pages/projects/files.php?id=215