[Nautilus]

Люди добрые, выручайте, пожалуйста.
Пытаюсь построить график

Код:

procedure TForm1.Button4Click(Sender: TObject);
var
i : integer;
x, y : real;
begin
x := 50.2;
y :=0.3;
for i := 0 to 100 do
begin
x := x + i;
y := sin(x*3.14);
chart1.Series[0].AddXY(x,y);
end;
end;

и на жирной строке он ругается "Value assigned to 'y' never used"
как только не крутил y :=0.3... что это может быть ???
Спасибо небезразличным...

[angvelem]

Всего навсего, что данное присвоение не используется далее в программе. В цикле идёт новое присвоение, без учёта предыдущего, вот компилятор и сообщил об этом.

[Nautilus]

спасибо, теперь ту строку закомментировал, но появилось следующее сообщение "List index out of bounds (0)" и прерывается программа...

[PhoeniX]

Ну а переводчик юзать кто будет?

Код:

chart1.Series[0]

Нулевой индекс не создан на момент обращения к нему.

[Nautilus]

Да, вы правы, я не определил тип диаграммы, а также напорол бока с переменными (необходимо double вместо real).
Спасибо большое всем.