Можно в несколько колонок (свойство Columns).
Код:
var s4: array[1..4] of string = ('one', 'two', 'three', 'four');
procedure TForm1.Button1Click(Sender: TObject);
var i: Integer;
begin
RadioGroup1.Columns:= 2;
for i:= 1 to 4 do
RadioGroup1.Items.Add(s4[i]);
RadioGroup1.ItemIndex:= 0;
end;