Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2003.02.13;
Скачать: 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 вся ветка

Текущий архив: 2003.02.13;
Скачать: CL | DM;

Наверх




Память: 0.49 MB
Время: 0.015 c
3-38067
Ig0r
2003-01-27 10:53
2003.02.13
ключевое поле в ADO


8-38390
bg8
2002-10-22 21:57
2003.02.13
Анализ звука в реальном времени


1-38365
Бук
2003-02-03 07:55
2003.02.13
try... except


3-38027
wildcow
2003-01-29 10:43
2003.02.13
SQL 2000 использование Distinct


4-38659
inki35
2002-12-29 15:36
2003.02.13
dll+hook