TCanvas ?

Entendendo um pouko sobre o Canvas

var
Form1: TForm1;
OffScreen: Tbitmap;


Canvas.Arc(10,10,200,200,10,100,100,100); //Desenha um circulo que pode ser modificado sem uma parte ou pode ser inteiro


Canvas.Chord(10,10,50,50,100,100,50,50); //Desenha um circula que pode ser modificado


Canvas.Draw(50,50,offscreen); //Desenha uma imagem, que deve ser especificada


Canvas.Ellipse(50,50,60,60); //Desenha apenas um circulo

Canvas.LineTo(50,10); //Desenha uma linha conforma as coordenadas


Canvas.MoveTo(10,100); //Desenha uma linha em direção a outra linha


Canvas.Pie(50,50,155,155,100,100,200,200); //Desenha um circulo sem um lado


Canvas.Rectangle(30,30,90,90); //Desenha um quadrado


Canvas.RoundRect(40,40,100,100,30,30); //Desenha um quadrado com borda arredondada


Canvas.TextOut(90,90,´Delphi´); //Escreve


Canvas.Pixels[50,100]:=clblue; //Desenha um linha que você pode selecionar a cor


Canvas.Brush.Color:=clred; //Pinta os desenhos que estão fechado


Canvas.Brush.Bitmap:=offscreen; //Você pode pinta os desenhos com uma figuara


Canvas.Pen.Color:=clgreen; //Pinta todas as linha de uma cor


Canvas.Pen.Width:=5; //Especifica a tamanho da linha


para testar você deve usar um button, cada linha executa uma ação diferente.