Показать сообщение отдельно
  #6  
Старый 15.01.2010, 07:17
AlexSku AlexSku вне форума
Специалист
 
Регистрация: 07.05.2007
Адрес: Москва
Сообщения: 884
Репутация: 21699
По умолчанию

Можно в несколько колонок (свойство 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;
Ответить с цитированием