[Yurk@@@]

Всем привет! Помогите разобраться с построением гистограммы (bar) в делфи. На графике надо отобразить всего один столбец, но он должен менять свои значения каждую секунду. Значения любые.
Пытался сделать что то этого:

Код:

procedure TForm1.Timer1Timer(Sender: TObject);
begin
x:=random(100);
form1.Series1.AddY(x);
end;

Но тут столбцы плодятся каждую секунду с рандомными значениями. А мне нужет всего один.

[movnet]

Код:

form1.Series1.YValue[0] := x;

[Yurk@@@]

Спасибо! Работает!

Код:

procedure TForm1.Timer1Timer(Sender: TObject);
begin
x:=random(100);
x1:=random(30);
Series1.YValue[0]:=x;
Series1.YValue[1]:=x1;
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
series1.AddY(x);
series1.AddY(x1);
end;