Показать сообщение отдельно
  #2  
Старый 23.08.2019, 20:51
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,015
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Есля я правильно понял, то придется использовать именно TChart.
1. Находишь нужную запись
2. Очищаешь серию в TChar
3. Добавляешь нужные точки по полям, типа
Код:
Query1.Locate(...); // выбираем нужную запись

Char1.Series[0].Clear;
Char1.Series[0].Add(1,Query1.FieldByName('F1').AsInteger);
Char1.Series[0].Add(2,Query1.FieldByName('F2').AsInteger);
Char1.Series[0].Add(3,Query1.FieldByName('F3').AsInteger);
Char1.Series[0].Add(4,Query1.FieldByName('F4').AsInteger);
Char1.Series[0].Add(5,Query1.FieldByName('F5').AsInteger);
Как-то так, не помню точные имена методов, сам по подсказкам посмотришь. Если тебе надо автоматически перерисовывать график при смене записи в DBGrid, то тогда надо поместить этот код в соотв. обработчик смены записи (если правильно помню, то он у TDatasource и называется как-то типа OnBrowse).
Ответить с цитированием