Как разбить StringList в Lazarus

Question

У меня большая проблема с StringList. У меня есть текстовый файл с текстом, как это:

51,179 km=Powiat Ostrzeszowski
51,179 - 61,402 km=Powiat Wieruszowski
61,402 - 64,559 km (d. DW450)=Powiat Wieruszowski
64,559 km (d. DW450)=Powiat Kępiński

Я хочу импортировать этот файл и показать первые значения, перед "=" в RadioGroup. Вторые значения после "=" я хочу показать на ярлыке в тот момент, когда пользователь нажимает правильное значение на RadioGroup.

Я хотел бы оперировать Именами и Значениями StrongList.

Примерно так:

В *.pas файле у меня есть:

var
  Form1: TForm1;
  list: TStringList;
  i: Integer;

На FormCreate:

list := TStringList.Create;    
list.LoadFromFile('dat\a1pik.dat');
RadioGroup1.Visible := true;
RadioGroup1.Items.Clear;

for i := 0 to list.Count-1 do
    begin
        RadioGroup1.Items.Add(list.Names[i]);
    end;

И первые ценности у меня есть на RadioGroup.

Я пытаюсь с RadioGroup, как это:

procedure TForm1.RadioGroup1Click(Sender: TObject);
    begin
    Label.Caption := list.Values[list.Names[RadioGroup1.ItemIndex]];
    end;

Но не работает. Что я делаю не так?

PS извините за мой английский:)