Скачать: CL | DM;

Помогите !! Первый раз столкнулся с TChart ...   Найти похожие ветки 

← →
Alpine ©   (2003-01-31 12:05) [0]

Как линию хоть рисовать то ... Я Сериес добавил ... Делаю Chart1.Series[0].AddXY(10,10) она мне ничего не рисует (( !
Помогите ... Если можно примеры ... У меня в демосах нету !

---

← →
Axis_of_Evil ©   (2003-01-31 12:18) [1]

рисуем нечто:

procedure TForm1.Chart1Click(Sender: TObject);
var
x: Real;
begin
x := -5.0;
while (x <= 5.0) do
begin
Chart1.SeriesList[0].AddXY(x, x*x - sin(x)*x, "", ClRed);
x := x + 0.1;
end;

end;

ЗЫ в демосах есть, но я в них ниче не понял.

---

← →
Axis_of_Evil ©   (2003-01-31 12:19) [2]

Сериес линией сделать не забудь (лучше не 3Д)

---

← →
pifpaf   (2003-01-31 12:20) [3]

Series какой? Если это например Line, то правильно, что не рисует, точка-то одна.

---

← →
Alpine ©   (2003-01-31 12:22) [4]

Огромное Програмистическое Спасибо ...

---

← →
Axis_of_Evil ©   (2003-01-31 12:22) [5]

не
Chart1.Series[0].AddXY(10,10),
а
Chart1.SeriesList[0].AddXY

---

← →
Alpine ©   (2003-01-31 17:56) [6]

Ребята как мне нарисовать паралелограмм ...
Коороче такая беда надо найти сумму векторов ... Надо нарисовать паралеграмм по данным координатам а затем провести в нём диоганаль !! Помогите плиззззззз

---

← →
gsu ©   (2003-01-31 18:00) [7]

нарисуй на канвасе линиями и все

---

← →
Alpine ©   (2003-01-31 18:03) [8]

Координаты будут постоянно меняться следовательно рисунок тоже !!

---

← →
Илайдж   (2003-01-31 18:18) [9]

Вопрос в тему: есть некая последовательность данных (скажем массив из 20 значений) и идет постоянных сдвиг данных (данные дополняются, замещая собой предыдущие элементы массива).

Каким образом отрисовать на TChart график изменения? (чтобы старые данные уходили за горизонт [пусть даже без возможности просмотра], а новые отрисовывались)

---

← →
gsu ©   (2003-01-31 18:23) [10]

Clear и перерисовывать ?

---

← →
Alpine ©   (2003-01-31 18:30) [11]

КАК НАРИСОВАТЬ ТРЕУГОЛЬНИК ИЗ ЗАДАННЫХ КООРДИНАТ КОТОРЫЕ БУДУТ МЕНЯТЬСЯ В ПРОЦЕССЕ ??????????????????????

---

← →
Alpine ©   (2003-01-31 18:54) [12]

Аааааааааааааааааааууууууууууууууууууу

---

← →
Alpine ©   (2003-01-31 22:24) [13]

Мастера выручайтеееее !!!! Плизззззз !!!

---

← →
Илайдж   (2003-02-03 10:45) [14]

2 gsu:
если это для меня, хотелось бы кусочек кода.
Я никогда с ним не работал просто

---

← →
Илайдж   (2003-02-04 08:57) [15]

С вашего позволения "тему наверх".

---

← →
Someone   (2003-02-04 10:52) [16]

Илайдж:

with Series[0] do
if Count<Dim then //Dim=20 в твоем случае
AddXY(BottomAxis.Minimum+Count,Value) //просто добавляем
else begin // первый ушел, последний пришел ;-)
BottomAxis.Maximum:=BottomAxis.Maximum+1; //сдвинули ось
BottomAxis.Minimum:=BottomAxis.Minimum+1;
AddXY(BottomAxis.Maximum,Value); //добавили новый
Delete(0); //удалили из списка первый
end;

Удалять не забывай :-), там максимальное число элементов помоему High(Integer), но все равно, зачем память забивать. Удачи!!!

---

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

Скачать: CL | DM;



Память: 0.48 MB
Время: 0.011 c