Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Как подписывать точки серий на TChart, кроме как стандартно? [D7, 2000, XP]


Vlad Oshin ©   (2007-02-12 13:57:00) 

with Chart1 do  begin
   Title.Text.Clear;
   Title.Text.Add('Вася');
   ser1 := TLineSeries.Create(nil);
   ser1.Clear;
   ser1.Marks.Visible:=true;
   ser1.Marks.Style:=smsLabelPercentTotal; // показывать сколько Вася и процент от общего (стандартная подпись)
   ser1.ParentChart := Chart1;
                  end;

ADOQuery1.First;
while not ADOQuery1.Eof do begin
   i:=i+1;
   j:=strtoint(ADOQuery1.FieldValues['a']);
   ser1.AddXY(i, j);
// тут надо подписать эту точку графика
// допустим, Это Вася в феврале, марте и т.д.
   AdoQuery1.Next;
                                     end;


Vlad Oshin   (2007-02-12 14:18:00) [1]

блин.. точно
вот что значит хелп слетел (частично)
что за глюк... когда специально ищешь, т.е. когда знаешь что есть, и упрямо колотишь разные варианты - находит, а так, примерно если - нет.. а раньше было...

тем не менее - :)

спасибо


MBo   (2007-02-12 14:11:00) [2]

у AddXY есть еще два необязательных параметра...


Наверх

Титульная страница Поиск, карта сайта Написать письмо