![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#6
|
|||
|
|||
![]() Можно в несколько колонок (свойство 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; |