[Drozh]

Ну первое, я бы не стал во второй форме писать этот код...
Просто в кнопке Add поставил бы свойство ModalResult в mrOk а в первой рассматривал то что возвратил ShowModal

Код:

procedure TForm1.Button1Click(Sender: TObject);
var
 ComboBox: TComboBox;
begin
 if Form2.ShowModal = mrOk then
 begin
  ComboBox :=
   FindComponent(Format('ComboBox%d', [RadioGroup1.ItemIndex +1 ])) as TComboBox;
  ComboBox.Text := //Text;
  ComboBox.Items.Add(//Text);
 end;
end;

А во втором случае у тебя неразбериха с индексами (да и размести это кнопку на 1 форме)

Код:

procedure TForm1.Button2Click(Sender: TObject);
var
 Index: Integer;
 ComboBox: TComboBox;
begin
 ComboBox :=
   FindComponent(Format('ComboBox%d', [RadioGroup1.ItemIndex +1 ])) as TComboBox;

  if ComboBox.Items.Count > 1 then
  begin
   Index := ComboBox.ItemIndex;
   ComboBox.Items.Delete(Index); // удалили строку Index инкрементировался автоматически
   ComboBox.ItemIndex := Index;
  end
  else
   ShowMessage('Вы хотите удалить последнюю запись');
end;