radiobuttons asociados a un edit

[haffo]

Ya he logrado poner un radiogroup , el código es el siguiente:

procedure TForm1.RadioGroup2Click(Sender: TObject);
begin
Edit1.Text := RadioGroup2.Items[RadioGroup2.ItemIndex];
end;

Y el del edit es:

procedure TForm1.Edit1Change(Sender: TObject);
begin
RadioGroup1.ItemIndex := TStringList(RadioGroup1.Items).IndexOf(Edit1.Text);
muestreo:=strtoint(edit1.text);
end;

Pero me da un error cuando pulso cualquiera de los radiobuttons:

"EconvertError with message "14400 ' is no a valid integer value

Cçomo puedo solucionarlo ?????

GRACIAS