| Форумы
ЧАТ |
Орешник |
|
| Форумы -» | Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG |
|
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Синусоида [D6, WinXP]
veZuk © (2002-10-06 11:26:00)У меня в 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;
Как мне сделать, что бы синусоида строилась гладко, а не этими тупыми отрезками?
veZuk (2002-10-06 11:56:00) [1]А, всё. Теперь разобрался. Спасибо.
Hooch (2002-10-06 11:54:00) [2]ты в цикле идеш с шагом = 1, шаг у тебя это i, сделай шаг меньше 1, например 0.1 и будет сказка, надеюсь как сделать понятно ?
ximka (2002-10-06 11:40:00) [3]а ты ручками на форме, и с шагом -> 0
veZuk (2002-10-06 11:35:00) [4]Тогда вообще какое-то мясо получается. Т.к. я ещё должен менять значения a,b,c.
Hooch (2002-10-06 11:28:00) [5]идти с меньшим шагом наверное
| |
