Синусоида

← →
veZuk © (2002-10-06 11:26) [0]

У меня в TChart"е строится синусоида по функции f(x)=b*sin(a*x+c):

procedure TForm1.Chart(a,b,c: Extended); var k: Extended; i: Integer; begin Series1.Clear; for i:=-100 to 100 do begin Series1.AddXY(i,b*sin(a*(i)+c)); end; end;

Как мне сделать, что бы синусоида строилась гладко, а не этими тупыми отрезками?

← →
Hooch © (2002-10-06 11:28) [1]

идти с меньшим шагом наверное

← →
veZuk © (2002-10-06 11:35) [2]

Тогда вообще какое-то мясо получается. Т.к. я ещё должен менять значения a,b,c.

← →
ximka © (2002-10-06 11:40) [3]

а ты ручками на форме, и с шагом -> 0

ты в цикле идеш с шагом = 1, шаг у тебя это i, сделай шаг меньше 1, например 0.1 и будет сказка, надеюсь как сделать понятно ?

А, всё. Теперь разобрался. Спасибо.

Синусоида Найти похожие ветки