В обработчике событий напишите:

begin
 Application.terminate;
 WinExec(GetCommandLine, SW_SHOWNORMAL);
end;

В обработчике событий пишем:

var
  i:integer;
  array_of_color: array [0..3] of TColor;
begin
  //Задаем цвета
  array_of_color[0]:=clRed;
  array_of_color[1]:=clGreen;
  array_of_color[2]:=clYellow;

  //Раскрашиваем
  for i:=0 to RadioGroup1.Items.Count-1 do
   RadioGroup1.Button[i].Font.Color:=array_of_color[i];
 
end;