No dices como se presentan esas posibles opciones, yo te doy un ejemplo con un RadioGroup.
1.- Pon un Radiogroup en tu formulario.
2.- Pon un Edit.
3.- En la propiedad Items TStrings del Radio Group escribe:
Uno <Enter>
Dos <Enter>
Tres <Enter>
4- En el evento OnChage del RadioGroup:
Código Delphi
[-]
procedure TForm1.RadioGroup1Click(Sender: TObject);
begin
Case RadioGroup1.ItemIndex of
0:Edit1.Text:='Eligio_Uno';
1:Edit1.Text:='Eligio_Dos';
2:Edit1.Text:='Eligio_Tres';
end;
end;
No es exactamente lo que pides, pero con un par de cambios, sino colijo mal tu solicitud te podrá servir.
Un Saludo.