Бит имейдж или канва? Что лучше?

Я пишу курсовую, мне нужно нарисовать график функции. Но эта функция в цикле и мне нужно, чтоб она выводила каждое значение в точку на графике.Есть какие-нибудь мысли? Или сделать через tchar, но как? Пробовал так:

Function y1(x:real):real;    
   begin    
      y1:=cos(x)-(4*x)+1;
   end;

Function y2(x:real):real;    
   begin    
      y2:=-sin(x)-4;
   end;

Function y3(x:real):real;    
   begin
      y3:=-cos(x);
   end;

procedure TForm1.Button1Click(Sender: TObject);    
   begin    
      begin    
         a1:=StrToFloat(Edit1.Text);
         b1:=StrToFloat(Edit5.Text);
         d:=StrToFloat(Edit4.Text);
         begin
           if (abs(y1(a1)*y3(b1))>d)then
              w:=a1 else w:=b1;
         end;
         x:=w-(y1(w)/y2(w));
         while (abs(y1(w))<d) do
           w:=x;
      end;
      xr1:=x;            
      Label1.Caption:='метод касательных='+FloatToStr(xr1);    
   end;