Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

Ответ
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 23.05.2008, 14:21
denverus denverus вне форума
Прохожий
 
Регистрация: 31.01.2008
Сообщения: 16
Репутация: 10
Восклицание График в Delphi

Здравствуйте.
В Delphi 7 я рисую график вот таким вот способом :
massiv2[sis]:=(FloatToStr(Month1)+'.'+FloatToStr(Year1));
dbchart2.Series[1].Add((massiv1[y]), (massiv2[y]), clBlue);

как вы сами понимаете переменная “massiv2” является строкового типа, и в ней указывается рассчитанный месяц и год. Например: 1.2008 или 11.2009. И когда я вывожу график, у меня получается что он выводит все точки пропорционально не зависимо от даты. Т.е расстояние между первым и вторым или третьим и восьмым месяцем будут одинаковы, т.к. они в массиве будут идти по порядку. Как можно исправить эту ошибку, не считая добавления всех не достающих месяцев?
Ответить с цитированием
  #2  
Старый 23.05.2008, 14:48
Аватар для Thrasher
Thrasher Thrasher вне форума
Illuminati
 
Регистрация: 06.03.2008
Адрес: Крым, г. Симферополь
Сообщения: 348
Репутация: 8808
По умолчанию

Попробуй в качестве Х указывать номер месяца.
__________________
Хорошо написанная программа не требует документации
ICQ 9-184-668.
Ответить с цитированием
  #3  
Старый 23.05.2008, 15:07
denverus denverus вне форума
Прохожий
 
Регистрация: 31.01.2008
Сообщения: 16
Репутация: 10
По умолчанию

Не получается, и к тому же мне нада то бы он именно число и месяц выводил...
Ответить с цитированием
  #4  
Старый 23.05.2008, 16:01
Аватар для Thrasher
Thrasher Thrasher вне форума
Illuminati
 
Регистрация: 06.03.2008
Адрес: Крым, г. Симферополь
Сообщения: 348
Репутация: 8808
По умолчанию

Используй AddXY:

Chart.Series[NUmSeries].AddXY(NumMonth,GraphValue,MonthName,Color);

Пример:

Код:
Chart1.Series[0].AddXY(1,2,'Январь',clRed);
Chart1.Series[0].AddXY(2,5,'Февраль',clRed);
Chart1.Series[0].AddXY(10,12,'Октябрь',clRed);
Chart1.Series[0].AddXY(11,7,'Ноябрь',clRed);
__________________
Хорошо написанная программа не требует документации
ICQ 9-184-668.
Ответить с цитированием
Ответ


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 13:24.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025