![]() |
|
|
#37
|
|||
|
|||
|
вот обработчик на кнопку для построения графика, но ошибка при нажатии!!что не так??
Код:
procedure TForm1.btn10Click(Sender: TObject);
var
i: integer;
begin
with strngrd1 do
for i:=1 to RowCount-1 do
cht4.Series[1].AddXY(StrToFloat(strngrd1.Cells[3,i]),StrTofloat(strngrd1.Cells[4,i]),'',clTeeColor);
cht4.Series[2].AddXY(StrToFloat(strngrd1.Cells[3,i]),StrTofloat(strngrd1.Cells[5,i]),'',clTeeColor);
lnsrsSeries1.XValues.Order:=LoNone;
end; |