Delphi. Canvas. График не получается

[Erlotaza]

Прочитал данные из файла, этим числам присвоил переменные. Теперь по ним нужно построить график. Он у меня не такой каким должен быть.
Пожалуйста помогите, завтра сдавать, не знаю уже в чем тут дело.
http://zalil.ru/34575926


вот такой должен быть, в Маткаде получился

[Stilet]

Canvas???
Это Лаба?

[BDA]

Хм, пока получился не очень похожий:

// sobstvenno GRAFIK :
    t := tt1; // начальная точка х
    U := A1 * sin(2 * pi * t / t1) + A2 * sin(2 * pi * t / t2) + A3 * sin
      (2 * pi * t / t3) + A4 * sin(2 * pi * t / t4) + A5 * sin
      (2 * pi * t / t5);
    img1.Canvas.MoveTo
      (trunc(img1.width div 2 + t * ((img1.width - 60) / (tt2 - tt1))),
      trunc(img1.Height div 2 - U * ((img1.Height - 10) / 80)));
    repeat
      t := t + 0.05;
      U := A1 * sin(2 * pi * t / t1) + A2 * sin(2 * pi * t / t2) + A3 * sin
        (2 * pi * t / t3) + A4 * sin(2 * pi * t / t4) + A5 * sin
        (2 * pi * t / t5);
      img1.Canvas.LineTo
        (trunc(img1.width div 2 + t * ((img1.width - 60) / (tt2 - tt1))),
        trunc(img1.Height div 2 - U * ((img1.Height - 10) / 80)));
    until t >= tt2;

[Erlotaza]

ОГРОМНОЕ СПАСИБО. Уже не помню что поменял, но график получился точно такой же как в МатКаде.
Благодарю!