Дело еще в том что я на кнопке Button1, которую я жму. Я обновляю список радиокнопок на котором у меня типа обрабатывается событие я его 
	Код:
	    while RadioGroup1.Items.Count > 0 do  
       RadioGroup1.Items.Delete(0); 
 
а затем создаем новые
	Код:
	Ocenka := TmpStr;
      I := RadioGroup1.Items.Add(Ocenka);
      RBtn := TRadioButton(RadioGroup1.Controls[i]);
     SetWindowLong(RBtn.Handle,GWL_STYLE,GetWindowLong(RBtn.Handle,GWL_STYLE) or BS_MULTILINE);
      RBtn.OnKeyDown:=RadioKeyDown;