[Kaktuz]

Я вот как-то не могу понять одной истины. Как правильно работать с переменными? Справку листал, но что-то как-то не помогло. Пытался реализовать простейший пример, но ни как...
В сообщении должен был отобразится текст переменной, номер которой указан пользователем.

Код:

var
  Form1: TForm1;
  var new : array [1..3] of string;
  var a : string;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
a:=Edit1.Text;
ShowMessage(new[a]);
end;

procedure TForm1.FormCreate(Sender: TObject);
begin
new[1]:='1';
new[2]:='2';
new[3]:='3';
end;