:: MVP ::
|
|
:: RSS ::
|
|
|
Как получить доступ к отдельным элементам RadioGroup?
// Сделать отдельный элемент RadioGroup неактивным
procedure TForm1.Button1Click(Sender: TObject);
begin
TRadioButton( RadioGroup1.Controls[1] ).Enabled := False;
end;
// Скрыть отдельный элемент RadioGroup
procedure TForm1.Button1Click(Sender: TObject);
begin
TRadioButton( RadioGroup1.Controls[1] ).Hide;
end;
// Изменить цвет отдельного элемента RadioGroup
procedure TForm1.Button1Click(Sender: TObject);
begin
TRadioButton( RadioGroup1.Controls[1] ).Color := clRed;
end;
|
При использовании материала - ссылка на сайт обязательна
|
|