В коде и так уже всё показано до нас. Нужно создать новый проект и накидать на форму компонентов из списка юнита, в данном случае это
Код:
Edit1: TEdit;
Button1: TButton;
Label1: TLabel;
RadioButton1: TRadioButton;
RadioButton2: TRadioButton;
RadioButton3: TRadioButton;
RadioButton4: TRadioButton;
Button2: TButton;
затем кликнуть по двум баттонам чтоб создать для них обработчики и заменить содержимое юнита формы на вышеприведённое. Всё