TChart, LeftAxis, метки по оси У для нескольких, динамически создающихся, серий Опции

[*kitty*]

Проблема в следующем: есть TChart и несколько серий, количество которых заранее неизвестно, поэтому серии создаются динамически по необходимости. Каждая серия - это графическое представление сигнала. Каждый сигнал имеет собственное имя. Имена содержатся в массиве, например: Name_of_signals: array [1..N] of string. Нужно, чтобы по оси У (LeftAxis) напротив каждого сигнала стояло его имя (как на рис.2). Используя событие OnGetAxisLabel ,

procedure TForm1.Chart1GetAxisLabel(Sender: TChartAxis;
  Series: TChartSeries; ValueIndex: Integer; var LabelText: String);
var i:integer;
begin
 if (Sender=Chart1.LeftAxis)and(ValueIndex>-1)
  then LabelText:=Name_of_signals[i]; //i здесь по идее номер серии (сигнала)
end;

метка появляется только напротив первого сигнала, т.е только для первой серии (рис.1).
Как сделать, чтобы напротив каждой серии стояло нужное имя? Что-то никак не получается...
На рисунках ниже показано как примерно это должно выглядеть.

[volvo]

Показывай, как создаются серии динамически (в частности - каким образом получается расположение серий "одна под другой"). К тому же в приведенном фрагменте кода i - локальная переменная, которой нигде не присваивается никакое значение, там мусор, а не номер серии.

[*kitty*]

К тому же в приведенном фрагменте кода i - локальная переменная, которой нигде не присваивается никакое значение, там мусор, а не номер серии.

Да это понятно, я просто хотела на простом примере разобраться, написала так просто для вида
Реальная же программа гораздо объёмнее, все данные считываются с текстового файла, определённого вида. Наверное, в ней будет сложно разобраться, но если это так принципиально, то, конечно, выложу.