Форум: "Основная";
Текущий архив: 2002.10.14;
Скачать: [xml.tar.bz2];

Вниз

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

← →
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

---

← →
Hooch   (2002-10-06 11:54) [4]

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

---

← →
veZuk   (2002-10-06 11:56) [5]

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

---

Страницы: 1 вся ветка

Форум: "Основная";
Текущий архив: 2002.10.14;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.45 MB
Время: 0.009 c