IPB
ЛогинПароль:

> ВНИМАНИЕ!

Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.

Наладить общение поможет, если вы подпишитесь по почте на новые темы в этом форуме.

 
 Ответить  Открыть новую тему 
> Chart из StrihgGrida
сообщение
Сообщение #1





Группа: Пользователи
Сообщений: 8
Пол: Мужской

Репутация: -  0  +


нужно пстроить график по значениям StringGrid'a(2 строчки, тоесть значения X и Y. и сколько тo столбцов. )далее добавить три точки координаты которых нам известны(Х одинаковые, а У берутся из label's). Воспользовался Chart. Возникла проблема с 3мя точками, не всегда их показывает. И не знаю что сделать если значения в label меняются, точки превращаются уже в линии и с последующим нажатием продолжают рисовать лини. Надо что то типа очистки сделать, а как не знаю. помогите!!!

procedure TForm1.BitBtn3Click(Sender: TObject);
var
k:integer;
begin

for k:=1 to (stringgrid1.ColCount-1) do
begin
chart1.SeriesList[0].AddXY(strtofloat(stringgrid1.Cells[k,0]),strtofloat(stringgrid1.Cells[k,1]),'');
end;
for k:=1 to 2 do
chart1.SeriesList[1].AddXY(strtofloat(edit1.Text)+(k*0.1),strtofloat(label14.Caption)+(k*0.1),'',clBlue);
for k:=1 to 2 do
chart1.SeriesList[2].AddXY(strtofloat(edit1.Text)+(k*0.1),strtofloat(label16.Caption)+(k*0.1),'',clYellow);
for k:=1 to 2 do
chart1.SeriesList[3].AddXY(strtofloat(edit1.Text)+(k*0.1),strtofloat(label20.Caption)+(k*0.1),'',clGreen);
end;

 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 





- Текстовая версия 21.09.2020 20:56
500Gb HDD, 6Gb RAM, 2 Cores, 7 EUR в месяц — такие хостинги правда бывают
Связь с администрацией: bu_gen в домене octagram.name