оОбъеденить Edit => SpingEdit => RadioGroup

[Veselyn]

нужно чтобы при вводе числа (от 1 до 6) в Edit, изменялось значение SpingEdit (на число в Edite) и соответственный элемент в RadioGroup принимал значение true
Я читал что можно с помощью Associate, но что-то не получается.
Помогите доделать

[mihali4]

procedure TForm1.Edit1Change(Sender: TObject);
begin
SpinEdit1.Value:=StrToInt(Edit1.Text);
RadioGroup1.ItemIndex:=SpinEdit1.Value;
end;

Что тут заумного ?