Здравствуйте.
У меня
Delphi XE.
В
ScrollBox создаю
RadioGroup .
Пробую менять цвет шрифта
Код:
TRadioGroup(RG1.Components[zz]).Font.color := RGB(255,255,255);
или так :
Код:
TRadioButton(RG1.Components[zz]).ParentFont := false;
TRadioButton(RG1.Components[zz]).Font.Color := RGB(255,255,255);
или так, при создании RadioGroup :
Код:
RG1.Font.Name:='Tahoma';
RG1.Font.Size:=8;
RG1.Font.Color := RGB(255,255,255);
RG1.Font.Style:=[fsbold];
и ни чего не происходит .
Решил унаследовать цвет шрифта от родителя и изменить шрифт ,
как это правильно сделать.
Код:
type
TRadioGroup = class(ExtCtrls.TRadioGroup)
protected
procedure Paint;override;
end;
procedure TRadioGroup.Paint;
begin
что сюда писать
end;