![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Помогите !! Первый раз столкнулся с TChart ... [D6, Win2k]
Alpine © (2003-01-31 12:05:00)Как линию хоть рисовать то ... Я Сериес добавил ... Делаю Chart1.Series[0].AddXY(10,10) она мне ничего не рисует (( !
Помогите ... Если можно примеры ... У меня в демосах нету !
Someone (2003-02-04 10:52:00) [1]Илайдж:
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), но все равно, зачем память забивать. Удачи!!!
Илайдж (2003-02-04 08:57:00) [2]С вашего позволения "тему наверх".
Илайдж (2003-02-03 10:45:00) [3]2 gsu:
если это для меня, хотелось бы кусочек кода.
Я никогда с ним не работал просто
Alpine (2003-01-31 22:24:00) [4]Мастера выручайтеееее !!!! Плизззззз !!!
Alpine (2003-01-31 18:54:00) [5]Аааааааааааааааааааууууууууууууууууууу
Alpine (2003-01-31 18:30:00) [6]КАК НАРИСОВАТЬ ТРЕУГОЛЬНИК ИЗ ЗАДАННЫХ КООРДИНАТ КОТОРЫЕ БУДУТ МЕНЯТЬСЯ В ПРОЦЕССЕ ??????????????????????
gsu (2003-01-31 18:23:00) [7]Clear и перерисовывать ?
Илайдж (2003-01-31 18:18:00) [8]Вопрос в тему: есть некая последовательность данных (скажем массив из 20 значений) и идет постоянных сдвиг данных (данные дополняются, замещая собой предыдущие элементы массива).
Каким образом отрисовать на TChart график изменения? (чтобы старые данные уходили за горизонт [пусть даже без возможности просмотра], а новые отрисовывались)
Alpine (2003-01-31 18:03:00) [9]Координаты будут постоянно меняться следовательно рисунок тоже !!
gsu (2003-01-31 18:00:00) [10]нарисуй на канвасе линиями и все
Alpine (2003-01-31 17:56:00) [11]Ребята как мне нарисовать паралелограмм ...
Коороче такая беда надо найти сумму векторов ... Надо нарисовать паралеграмм по данным координатам а затем провести в нём диоганаль !! Помогите плиззззззз
Alpine (2003-01-31 12:22:00) [12]Огромное Програмистическое Спасибо ...
Axis_of_Evil (2003-01-31 12:22:00) [13]не
Chart1.Series[0].AddXY(10,10),
а
Chart1.SeriesList[0].AddXY
pifpaf (2003-01-31 12:20:00) [14]Series какой? Если это например Line, то правильно, что не рисует, точка-то одна.
Axis_of_Evil (2003-01-31 12:19:00) [15]Сериес линией сделать не забудь (лучше не 3Д)
Axis_of_Evil (2003-01-31 12:18:00) [16]рисуем нечто:
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;
ЗЫ в демосах есть, но я в них ниче не понял.