Компонент для точной отрисовки графики

[leejack]

Уважаемые форумчане, столкнулся с проблемой. Мог бы кто-нибудь подсказать компонент для отрисовки графиков. С типом данных real, видел что-то подобное в канве, как то рисовали Графики синусов и косинусов, чарт не нужен.

Задача сделать анимацию простую, в виде движения Геометрической фигуры.

Главное чтобы использовать вещественный тип данных для координирования

На счет конвы видел что как-то с изменением масштаба, но так и не Разобрался.

[Stilet]

GLScene подходит?

[leejack]

Сообщение от Stilet

GLScene подходит?

Ого, полноценный движок? Это серьезно слишком. Я конечно прибегну к нему, если других вариантов (попроще) не будет.

Из стандартных средств дельфи есть что нибудь вообще? Может какие хитрости или трюки? Чтобы на канве там рисовать с точностью до 0.001. Это к примеру? Если же нет, придется мучиться с этим движком.

[Аватар]

Так, например

procedure TForm1.Button1Click(Sender: TObject);
var x,y: real;
    i,j: longint;
begin
  for i:=0 to PaintBox1.ClientWidth do begin
    x:=i*4*Pi/PaintBox1.ClientWidth;
    y:=Sin(x);
    j:=Trunc(PaintBox1.ClientHeight-(y+1)*PaintBox1.ClientHeight/2);
    PaintBox1.Canvas.Pixels[i,j]:=0;
  end;
end;

[leejack]

Аватар, это конечно здорово! но теперь можете пояснить что вы делаете с переменными x и j? Или хотя бы теоретически объяснить что Вы здесь сделали?

[Аватар]

x масштабируется по всей ширине паинтбокса, чтобы уместилось два периода синусоиды
j масштабируется по всей высоте паинтбокса с нулем посредине