[29М]

не получается построить график tchart если координаты x и y находятся в одном столбце

Код:

var
i,j,n: Integer;
x,y:real;
begin
for i:=0 to n-1 do
for j:=0 to StringGrid1.ColCount-1 do
Series1.AddXY(x,y);
StringGrid1.Cells[j,0]:=FloatToStr(x);
StringGrid1.Cells[j,1]:=FloatToStr(y);
end;

помогите пожалуйста.
http://www.delphisources.ru/forum/at...d=146659219 0

[Kailon]

Разнесите по двум столбцам. Какая сложность?
Ну если так необходимо, то пусть первые 4 строки будут X, а вторые 4 строки будут Y, тогда:

Код:

  for I := 0 to 3 do
    begin
      X := StrToInt(SG.Cells[0, I]);
      Y := StrToInt(SG.Cells[0, I + 4]);
      Chart1.Series[0].AddXY(X, Y);
    end;

P.S.: из Вашего кода я так и не понял, что должно быть. Сначала цикл до какого-то n, который никак не изменяется. Затем вложенный цикл по столбцам таблицы, хотя нужны строки, с добавлением каких-то координат, которые в свою очередь неизвестны. Дальше в ячейки таблицы присваиваются опять эти неизвестные координаты. Вы понимаете?